Restore update command (#46)

purescript · Aug 1, 2017 · e6d1dfa · e6d1dfa
1 parent 26ea46e
commit e6d1dfa
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/app/Main.hs b/app/Main.hs
@@ -237,6 +237,12 @@ initialize setAndSource = do
     packageNameFromPWD =
       either (const untitledPackageName) id . mkPackageName
 
+update :: IO ()
+update = do
+  pkg <- readPackageFile
+  updateImpl pkg
+  echoT "Update complete"
+
 install :: String -> IO ()
 install pkgName' = do
   pkg <- readPackageFile
@@ -462,6 +468,9 @@ main = do
                                                      <*> optional (fromString <$> source))
                                    Opts.<**> Opts.helper)
             (Opts.progDesc "Initialize a new package"))
+        , Opts.command "update"
+            (Opts.info (pure update)
+            (Opts.progDesc "Update dependencies"))
         , Opts.command "uninstall"
             (Opts.info (uninstall <$> pkg Opts.<**> Opts.helper)
             (Opts.progDesc "Uninstall the named package"))