diff --git a/src/Semantic/CLI.hs b/src/Semantic/CLI.hs
index a602f2aae..8a4fc6ae8 100644
--- a/src/Semantic/CLI.hs
+++ b/src/Semantic/CLI.hs
@@ -180,7 +180,7 @@ languageModes = Language.PerLanguageModes
       = option auto (  long (shortName <> "-mode")
                     <> help ("The AST representation to use for " <> fullName <> " sources")
                     <> metavar "ALaCarte|Precise"
-                    <> value Language.ALaCarte
+                    <> value Language.Precise
                     <> showDefault)
 
 filePathReader :: ReadM File