diff --git a/Setup.hs b/Setup.hs
index 76062bcbe..41345396d 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -60,8 +60,8 @@ main = defaultMainWithHooks simpleUserHooks{ preBuild  = gfPreBuild
 --------------------------------------------------------
 
 data Mode = AllTenses | Present deriving Show
-all_modes = ["present","alltenses"]
-default_modes = [Present,AllTenses]
+all_modes = ["alltenses","present"]
+default_modes = [AllTenses,Present]
 
 data RGLCommand
   = RGLCommand