packages feed

cli 0.0.1 → 0.0.2

raw patch · 3 files changed

+16/−13 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Application.CLI: data Usage
- Application.CLI: printUsage :: String -> String -> CLIContext -> String
+ Application.CLI: initializeWithDefault :: CLI cliDefault => cliDefault -> String -> CLIContext
- Application.CLI: initialize :: CLI cliDefault => Maybe cliDefault -> String -> CLIContext
+ Application.CLI: initialize :: String -> CLIContext

Files

Application/CLI.hs view
@@ -15,9 +15,6 @@     , CLI(..)     , OptHelp(..)       -- ** Default CLIs-    , Usage-    , printUsage-     , Help(..)     , printHelp @@ -26,6 +23,7 @@     , getHeader     , getDefault     , initialize+    , initializeWithDefault     , with     ) where @@ -59,6 +57,7 @@     options _  = []     action  _ ctx _ = do         progName <- getProgName+        putStrLn $ progName ++ ": " ++ getHeader ctx         putStrLn $ printHelp "    " progName ctx  -------------------------------------------------------------------------------@@ -73,17 +72,21 @@ with c l = insertCommand (cliToCommand c) l  -- | Initialize a collection of commands-initialize :: CLI cliDefault-           => Maybe cliDefault -- ^ The command to execute if no option is given-           -> String           -- ^ CLI Description-           -> CLIContext-initialize defaultCli description =-    case defaultCli of-        Nothing  -> cmdMap-        Just cmd -> insertDefault (cliToCommand cmd) cmdMap+initializeWithDefault :: CLI cliDefault+                      => cliDefault -- ^ The command to execute if no option is given+                      -> String     -- ^ CLI Description+                      -> CLIContext+initializeWithDefault defaultCli description =+    insertDefault (cliToCommand defaultCli) cmdMap   where     cmdMap :: CLIContext     cmdMap = createContext (cliToCommand Usage) description++-- | Initialize a collection of command+initialize :: String     -- ^ CLI Description+           -> CLIContext+initialize description =+    createContext (cliToCommand Usage) description  ------------------------------------------------------------------------------- --                             Default Main                                  --
cli.cabal view
@@ -1,5 +1,5 @@ Name:                cli-Version:             0.0.1+Version:             0.0.2 Synopsis:            Simple Command Line Interface Library Description:     This package provides a simple Command Line Library
example/Main.hs view
@@ -17,4 +17,4 @@ main =     defaultMain         $ with Help-        $ initialize (Nothing :: Maybe Help) "Example of use of CLI Library"+        $ initialize "Example of use of CLI Library"