fortytwo 1.0.1 → 1.0.2
raw patch · 13 files changed
+69/−61 lines, 13 filesnew-component:exe:demoPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- demo/ConfirmExample.hs +9/−0
- demo/InputExample.hs +8/−0
- demo/Main.hs +16/−0
- demo/MultiselectExample.hs +11/−0
- demo/PasswordExample.hs +6/−0
- demo/SelectExample.hs +8/−0
- examples/ConfirmExample.hs +0/−9
- examples/InputExample.hs +0/−8
- examples/Main.hs +0/−16
- examples/MultiselectExample.hs +0/−11
- examples/PasswordExample.hs +0/−6
- examples/SelectExample.hs +0/−8
- fortytwo.cabal +11/−3
+ demo/ConfirmExample.hs view
@@ -0,0 +1,9 @@+module ConfirmExample where++import FortyTwo (confirm, confirmWithDefault)++main :: IO Bool+main = do+ confirm "Do you like music?"+ confirmWithDefault "Do you like pop music?" False+ confirmWithDefault "Do you play an instrument?" True
+ demo/InputExample.hs view
@@ -0,0 +1,8 @@+module InputExample where++import FortyTwo (input, inputWithDefault)++main :: IO String+main = do+ input "What's your name?"+ inputWithDefault "How old are you?" "22"
+ demo/Main.hs view
@@ -0,0 +1,16 @@+module Main where++import qualified InputExample+import qualified ConfirmExample+import qualified PasswordExample+import qualified SelectExample+import qualified MultiselectExample++main :: IO()+main = do+ InputExample.main+ ConfirmExample.main+ MultiselectExample.main+ SelectExample.main+ PasswordExample.main+ return ()
+ demo/MultiselectExample.hs view
@@ -0,0 +1,11 @@+module MultiselectExample where++import FortyTwo (multiselect, multiselectWithDefault)++main :: IO [String]+main = do+ multiselect "Which kind of sports do you like?" ["Soccer", "Tennis", "Golf"]+ multiselectWithDefault+ "What are your favourite books?"+ ["1984", "Moby Dick", "The Hitchhiker's Guide to the Galaxy"]+ ["1984", "The Hitchhiker's Guide to the Galaxy"]
+ demo/PasswordExample.hs view
@@ -0,0 +1,6 @@+module PasswordExample where++import FortyTwo (password)++main :: IO String+main = password "What's your secret password?"
+ demo/SelectExample.hs view
@@ -0,0 +1,8 @@+module SelectExample where++import FortyTwo (select, selectWithDefault)++main :: IO String+main = do+ select "What's your favourite color?" ["Red", "Yellow", "Blue"]+ selectWithDefault "What's your favourite film?" ["28 Days Later", "Blade Runner", "Matrix"] "28 Days Later"
− examples/ConfirmExample.hs
@@ -1,9 +0,0 @@-module ConfirmExample where--import FortyTwo (confirm, confirmWithDefault)--main :: IO Bool-main = do- confirm "Do you like music?"- confirmWithDefault "Do you like pop music?" False- confirmWithDefault "Do you play an instrument?" True
− examples/InputExample.hs
@@ -1,8 +0,0 @@-module InputExample where--import FortyTwo (input, inputWithDefault)--main :: IO String-main = do- input "What's your name?"- inputWithDefault "How old are you?" "22"
− examples/Main.hs
@@ -1,16 +0,0 @@-module Main where--import qualified InputExample-import qualified ConfirmExample-import qualified PasswordExample-import qualified SelectExample-import qualified MultiselectExample--main :: IO()-main = do- InputExample.main- ConfirmExample.main- MultiselectExample.main- SelectExample.main- PasswordExample.main- return ()
− examples/MultiselectExample.hs
@@ -1,11 +0,0 @@-module MultiselectExample where--import FortyTwo (multiselect, multiselectWithDefault)--main :: IO [String]-main = do- multiselect "Which kind of sports do you like?" ["Soccer", "Tennis", "Golf"]- multiselectWithDefault- "What are your favourite books?"- ["1984", "Moby Dick", "The Hitchhiker's Guide to the Galaxy"]- ["1984", "The Hitchhiker's Guide to the Galaxy"]
− examples/PasswordExample.hs
@@ -1,6 +0,0 @@-module PasswordExample where--import FortyTwo (password)--main :: IO String-main = password "What's your secret password?"
− examples/SelectExample.hs
@@ -1,8 +0,0 @@-module SelectExample where--import FortyTwo (select, selectWithDefault)--main :: IO String-main = do- select "What's your favourite color?" ["Red", "Yellow", "Blue"]- selectWithDefault "What's your favourite film?" ["28 Days Later", "Blade Runner", "Matrix"] "28 Days Later"
fortytwo.cabal view
@@ -1,5 +1,5 @@ name: fortytwo-version:1.0.1+version:1.0.2 synopsis: Interactive terminal prompt description: List of Prompt helpers to pimp the UIs of your haskell programs homepage: https://github.com/gianlucaguarini/fortytwo#readme@@ -13,6 +13,10 @@ extra-source-files: README.md cabal-version: >=1.10 +flag demos+ description: Build with demos+ default: False+ library hs-source-dirs: src exposed-modules: FortyTwo,@@ -35,17 +39,21 @@ ansi-terminal >= 0.6.0.0 && <= 0.7.1.1 default-language: Haskell2010 -executable examples+executable demo main-is: Main.hs other-modules: InputExample, ConfirmExample, PasswordExample, SelectExample, MultiselectExample- hs-source-dirs: examples+ hs-source-dirs: demo build-depends: base >= 4.7 && < 5, fortytwo default-language: Haskell2010+ if flag(demos)+ buildable: True+ else+ buildable: False Test-Suite spec type: exitcode-stdio-1.0