elm-get 0.1.1.1 → 0.1.1.2
raw patch · 4 files changed
+18/−17 lines, 4 files
Files
- LICENSE +1/−1
- elm-get.cabal +1/−1
- src/Get/Main.hs +1/−1
- src/Get/Options.hs +15/−14
LICENSE view
@@ -1,4 +1,4 @@-Copyright (c) 2013, Evan Czaplicki+Copyright (c) 2013-2014, Evan Czaplicki All rights reserved.
elm-get.cabal view
@@ -1,5 +1,5 @@ Name: elm-get-Version: 0.1.1.1+Version: 0.1.1.2 Synopsis: Tool for sharing and using Elm libraries Description: elm-get lets you install, update, and publish Elm libraries
src/Get/Main.hs view
@@ -41,7 +41,7 @@ Publish -> Publish.publish - _ -> Cmd.out "Not implemented yet!"+ Update _ -> Cmd.out "Not implemented yet!" where updateMaybe :: (Applicative f) => (a -> f b) -> Maybe a -> f (Maybe b) updateMaybe up m =
src/Get/Options.hs view
@@ -27,13 +27,13 @@ parser = info (helper <*> commands) ( fullDesc <> header top- <> progDesc "install, update, and publish elm libraries"+ <> progDesc "install and publish elm libraries" <> footer moreHelp ) where top = unwords [ "elm-get" , showVersion This.version ++ ":" , " The Elm Package Manager "- , "(c) Evan Czaplicki 2013"]+ , "(c) Evan Czaplicki 2013-2014\n"] moreHelp = unlines ["To learn more about a command called COMMAND, just do" , " elm-get COMMAND --help"@@ -42,9 +42,9 @@ commands :: Parser Command commands = hsubparser $ command "install" installOpts- <> command "update" updateOpts <> command "publish" publishOpts <> command "version" versionOpts+-- <> command "update" updateOpts -- TODO: implement update installOpts :: ParserInfo Command installOpts = info@@ -65,17 +65,18 @@ , " elm-get install tom/Array # install a specific github repo" , " elm-get install tom/Array 1.2 # install a specific version tag github repo" ] -updateOpts :: ParserInfo Command-updateOpts = info- (Update <$> many (argument str (metavar "LIBRARY" <> help "Library to update")))- ( fullDesc- <> progDesc "Check for updates to any local libraries, ask to upgrade."- <> footer examples- )- where examples = unlines- [ "Examples:"- , " elm-get update # check for updates to local libraries"- , " elm-get update tom/Array # update from a specific github repo" ]+-- | TODO: restore when update is actually implemented+-- updateOpts :: ParserInfo Command+-- updateOpts = info+-- (Update <$> many (argument str (metavar "LIBRARY" <> help "Library to update")))+-- ( fullDesc+-- <> progDesc "Check for updates to any local libraries, ask to upgrade."+-- <> footer examples+-- )+-- where examples = unlines+-- [ "Examples:"+-- , " elm-get update # check for updates to local libraries"+-- , " elm-get update tom/Array # update from a specific github repo" ] publishOpts :: ParserInfo Command publishOpts = info