ua-parser 0.7.4.1 → 0.7.5.0

raw patch · 4 files changed

+12/−9 lines, 4 filesdep ~aesondep ~yamlPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: aeson, yaml

API changes (from Hackage documentation)

Files

• changelog.md +3/−0
• src/Web/UAParser.hs +2/−2
• test/Main.hs +4/−4
• ua-parser.cabal +3/−3

@@ -1,3 +1,6 @@+0.7.5.0+* Remove aeson and yaml upper bounds+ 0.7.4.1 * Loosen aeson bounds 

@@ -33,7 +33,7 @@ import           Data.Default import           Data.FileEmbed import           Data.Maybe-import           Data.Monoid+import           Data.Monoid           as M import           Data.Text             (Text) import qualified Data.Text             as T import qualified Data.Text.Encoding    as T@@ -215,7 +215,7 @@     -> Text makeReplacements (_:cs) t = makeReplacements' (zip ([1..4] :: [Int]) (cs ++ repeat "")) t   where makeReplacements' [] acc = acc-        makeReplacements' ((idx, cap):caps) acc = let acc' = T.replace ("$" <> showT idx) cap acc+        makeReplacements' ((idx, cap):caps) acc = let acc' = T.replace ("$" M.<> showT idx) cap acc                                         in makeReplacements' caps acc' makeReplacements _ t = t 

@@ -6,7 +6,7 @@ ------------------------------------------------------------------------------- import           Control.Applicative     as A import qualified Data.ByteString.Char8   as B-import           Data.Monoid+import           Data.Monoid             as M import qualified Data.Text               as T import           Test.Tasty import           Test.Tasty.HUnit@@ -18,9 +18,9 @@  main :: IO () main = do-  uaCases <- mconcat A.<$> mapM loadTests ["test_resources/firefox_user_agent_strings.yaml"-                                          ,"test_resources/pgts_browser_list.yaml"-                                          ,"tests/test_ua.yaml"]+  uaCases <- M.mconcat A.<$> mapM loadTests ["test_resources/firefox_user_agent_strings.yaml"+                                            ,"test_resources/pgts_browser_list.yaml"+                                            ,"tests/test_ua.yaml"]   osCases <- mconcat <$> mapM loadTests [ "test_resources/additional_os_tests.yaml"                                         , "tests/test_os.yaml" ]   devCases <- loadTests "tests/test_device.yaml"

@@ -1,6 +1,6 @@ name:                ua-parser description:         Please refer to the git/github README on the project for example usage.-version:             0.7.4.1+version:             0.7.5.0 synopsis:            A library for parsing User-Agent strings, official Haskell port of ua-parser license:             BSD3 license-file:        LICENSE@@ -41,8 +41,8 @@     , bytestring     , text     , pcre-light-    , yaml             >= 0.7 && < 0.9-    , aeson            >= 0.7 && < 1.3+    , yaml             >= 0.7+    , aeson            >= 0.7     , data-default     , file-embed       < 0.1