qr-imager 1.0.1.5 → 1.0.1.6

raw patch · 2 files changed

+11/−11 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• qr-imager.cabal +2/−2
• src/Data/QRCodes/Exe.hs +9/−9

@@ -1,5 +1,5 @@ name:                qr-imager-version:             1.0.1.5+version:             1.0.1.6 synopsis:            Library to generate QR codes from bytestrings and objects description:         Please see README.md homepage:            https://github.com/vmchale/QRImager#readme@@ -21,7 +21,7 @@                      , Data.QRCodes.Image                      , Data.QRCodes.Signature   other-modules:       Data.QRCodes.Utils-  build-depends:       base >= 4.8 && < 5+  build-depends:       base >= 4.9 && < 5                      , aeson                      , JuicyPixels                      , vector

@@ -1,12 +1,12 @@ -- | Parse options applicatively and read or write secure or non-secure QR codes. module Data.QRCodes.Exe where -import Options.Applicative-import Data.Aeson-import qualified Data.ByteString as B-import System.Environment (getArgs) --fix soon!-import Data.QRCodes-import Data.Monoid+import           Data.Aeson+import qualified Data.ByteString     as B+import           Data.QRCodes+import           Data.Semigroup+import           Options.Applicative+import           System.Environment  (getArgs)  -- | Data type for the executable comprising the command, whether to sign, whether to verify it worked, and the output filename data Prog = Prog { cmd     :: Com@@ -20,7 +20,7 @@ -- | main exec function exec :: IO () exec = execParser full >>= act-    where +    where         full = info (helper <*> program)             ( fullDesc             <> progDesc "Read/Write QR Codes with files"@@ -42,9 +42,9 @@ act (Prog Output False False filepath) = do     pipeIn <- B.getContents     byteStringToQR pipeIn filepath-act (Prog Input True _ filepath) = +act (Prog Input True _ filepath) =     (readQRStrSec filepath ".key.hk" :: IO String) >>= print-act (Prog Input False _ filepath) = +act (Prog Input False _ filepath) =     readQRString filepath >>= print  -- | Parser for the command line