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 +14/−11
- cli.cabal +1/−1
- example/Main.hs +1/−1
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"