diff --git a/Handler/CreateChallenge.hs b/Handler/CreateChallenge.hs
index e422f94..c7db92e 100644
--- a/Handler/CreateChallenge.hs
+++ b/Handler/CreateChallenge.hs
@@ -192,8 +192,8 @@ doChallengeUpdate challengeId updateType publicUrl publicBranch publicGitAnnexRe
 
 
 incrementVersion :: ChallengeUpdateType -> (Int, Int, Int) -> (Int, Int, Int)
-incrementVersion MajorChange (major, minor, patch) = (major + 1, 0, 0)
-incrementVersion MinorChange (major, minor, patch) = (major, minor + 1, 0)
+incrementVersion MajorChange (major, _, _) = (major + 1, 0, 0)
+incrementVersion MinorChange (major, minor, _) = (major, minor + 1, 0)
 incrementVersion ChallengePatch (major, minor, patch) = (major, minor, patch + 1)