diff --git a/yesod/Devel.hs b/yesod/Devel.hs
index e4843861..b1a7a6ee 100755
--- a/yesod/Devel.hs
+++ b/yesod/Devel.hs
@@ -80,8 +80,8 @@ mainLoop isDevel = forever $ do
 
    list <- getFileList
    _ <- if isDevel
-     then rawSystem "cabal"     ["build"]
-     else rawSystem "cabal-dev" ["build"]
+     then rawSystem "cabal-dev" ["build"]
+     else rawSystem "cabal"     ["build"]
 
    removeLock
    putStrLn "Starting development server..."