summaryrefslogtreecommitdiff
path: root/Command/Upgrade.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-03-21 20:46:43 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-03-21 20:48:58 -0400
commitc048905dc4c2ce155dbb03d7e60014568faa9553 (patch)
tree39f3ba6d18bd7b14931c191d05ca120a7ee7d5bd /Command/Upgrade.hs
parent02c3f3880b3663508bf291e0ac5b4fb44c8e1eee (diff)
upgrade messages
Diffstat (limited to 'Command/Upgrade.hs')
-rw-r--r--Command/Upgrade.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Command/Upgrade.hs b/Command/Upgrade.hs
index 94398c70a..880a5324f 100644
--- a/Command/Upgrade.hs
+++ b/Command/Upgrade.hs
@@ -10,6 +10,7 @@ module Command.Upgrade where
import Command
import Upgrade
import Version
+import Messages
command :: [Command]
command = [standaloneCommand "upgrade" paramNothing seek
@@ -20,6 +21,7 @@ seek = [withNothing start]
start :: CommandStartNothing
start = do
+ showStart "upgrade" ""
r <- upgrade
checkVersion
return $ Just $ return $ Just $ return r