usb-id-database 0.4.0.4 → 0.4.0.5
raw patch · 3 files changed
+22/−10 lines, 3 filesdep ~parsimonyPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: parsimony
API changes (from Hackage documentation)
Files
- System/USB/IDDB/LinuxUsbIdRepo.hs +11/−5
- System/USB/IDDB/UsbDotOrg.hs +9/−3
- usb-id-database.cabal +2/−2
System/USB/IDDB/LinuxUsbIdRepo.hs view
@@ -1,6 +1,7 @@-{-# LANGUAGE CPP #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE UnicodeSyntax #-}+{-# LANGUAGE CPP+ , NoImplicitPrelude+ , UnicodeSyntax + #-} {-| Functions to acquire a database from <http://linux-usb.org>. -} @@ -20,7 +21,7 @@ -- base import Control.Arrow ( second )-import Control.Monad ( (>>=), (>>), fail, fmap, return )+import Control.Monad ( (>>=), (>>), fmap, return ) import Data.Bool ( Bool, not ) import Data.Char ( String, isSpace ) import Data.Function ( ($), id )@@ -31,7 +32,7 @@ import Data.Maybe ( Maybe, fromJust ) import Data.Tuple ( fst ) import Numeric ( readHex )-import Prelude ( Num, error, fromInteger, seq )+import Prelude ( Num, error, seq ) import System.IO ( IO, FilePath ) #if MIN_VERSION_base(4,2,0) import System.IO ( IOMode(ReadMode)@@ -39,6 +40,11 @@ ) #else import System.IO ( readFile )+#endif++#if __GLASGOW_HASKELL__ < 700+import Control.Monad ( fail )+import Prelude ( fromInteger ) #endif -- base-unicode-symbols
System/USB/IDDB/UsbDotOrg.hs view
@@ -1,5 +1,7 @@-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE UnicodeSyntax #-}+{-# LANGUAGE CPP+ , NoImplicitPrelude+ , UnicodeSyntax + #-} {-| Functions to acquire a database from <http://www.usb.org>. -} @@ -18,13 +20,17 @@ ------------------------------------------------------------------------------- -- base-import Control.Monad ( (>>=), fail, fmap, return )+import Control.Monad ( (>>=), fmap, return ) import Data.Char ( String ) import Data.Function ( ($) ) import Data.Int ( Int ) import Data.Maybe ( Maybe, fromJust ) import System.IO ( IO, FilePath, readFile ) import Text.Read ( read )++#if __GLASGOW_HASKELL__ < 700+import Control.Monad ( fail )+#endif -- base-unicode-symbols import Data.Function.Unicode ( (∘) )
usb-id-database.cabal view
@@ -1,5 +1,5 @@ name: usb-id-database-version: 0.4.0.4+version: 0.4.0.5 cabal-version: >=1.6 build-type: Simple stability: provisional@@ -33,7 +33,7 @@ , bytestring == 0.9.* , containers < 0.5 , containers-unicode-symbols < 0.4- , parsimony >= 1 && < 1.1+ , parsimony >= 1 && < 1.2 ghc-options: -Wall cpp-options: -DBUILD_WITH_CABAL exposed-modules: System.USB.IDDB