influxdb 1.7.1.1 → 1.7.1.2

raw patch · 9 files changed

+52/−14 lines, 9 filesdep ~lensPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: lens

API changes (from Hackage documentation)

Files

• CHANGELOG.md +7/−0
• cabal.project +4/−0
• influxdb.cabal +4/−3
• src/Database/InfluxDB.hs +2/−3
• src/Database/InfluxDB/Format.hs +9/−3
• src/Database/InfluxDB/JSON.hs +2/−2
• src/Database/InfluxDB/Line.hs +2/−2
• src/Database/InfluxDB/Types.hs +22/−0
• tests/regressions.hs +0/−1

@@ -1,5 +1,12 @@ # Revision history for influxdb +## v1.7.1.2 - 2020-02-08++* Relax upper version bound for lens+* Fix documentation bugs+* Extend doctests+* Test with GHC 8.8.2+ ## v1.7.1.1 - 2019-09-09  * Relax upper version bound for lens

@@ -0,0 +1,4 @@+packages: .++package *+  test-show-details: direct

@@ -1,5 +1,5 @@ name: influxdb-version: 1.7.1.1+version: 1.7.1.2 synopsis: Haskell client library for InfluxDB description:   @influxdb@ is a Haskell client library for InfluxDB.@@ -19,11 +19,12 @@   GHC == 8.2.2   GHC == 8.4.4   GHC == 8.6.5-  GHC == 8.8.1+  GHC == 8.8.2  extra-source-files:   README.md   CHANGELOG.md+  cabal.project  flag examples   description: Build examples@@ -82,7 +83,7 @@     , foldl < 1.5     , http-client >= 0.5 && < 0.7     , http-types >= 0.8.6 && < 0.13-    , lens >= 4.9 && < 4.19+    , lens >= 4.9 && < 4.20     , network >= 2.6 && < 3.2     , optional-args >= 1.0 && < 1.1     , scientific >= 0.3.3 && < 0.4

@@ -47,7 +47,6 @@   , authentication    -- ** Parsing results-  -- $parsing-results   , QueryResults(..)   , parseResultsWith   , parseResultsWithDecoder@@ -168,8 +167,8 @@  === Using an one-off tuple -If all the field types are an instance of 'FromJSON', we can use a tuple to store-the results.+If all the field types are an instance of 'Data.Aeson.FromJSON', we can use a+tuple to store the results.  >>> :set -XDataKinds -XOverloadedStrings >>> type CPUUsage = (Tagged "time" UTCTime, Tagged "idle" Double, Tagged "system" Double, Tagged "user" Double)

@@ -117,6 +117,8 @@ -- -- >>> formatDatabase "test-db" -- "test-db"+-- >>> formatDatabase ("test-db-"%decimal) 0+-- "test-db-0" formatDatabase :: Format Database r -> r formatDatabase = runFormatWith Database @@ -124,6 +126,8 @@ -- -- >>> formatMeasurement "test-series" -- "test-series"+-- >>> formatMeasurement ("test-series-"%decimal) 0+-- "test-series-0" formatMeasurement :: Format Measurement r -> r formatMeasurement = runFormatWith Measurement @@ -131,6 +135,8 @@ -- -- >>> formatKey "test-key" -- "test-key"+-- >>> formatKey ("test-key-"%decimal) 0+-- "test-key-0" formatKey :: Format Key r -> r formatKey fmt = runFormat fmt (Key . TL.toStrict . TL.toLazyText) @@ -220,7 +226,7 @@  -- | Format a text. ----- Note that this doesn't escape the string. Use 'fieldKey' to format field+-- Note that this doesn't escape the string. Use 'formatKey' to format field -- values in a query. -- -- >>> :t formatKey text@@ -230,7 +236,7 @@  -- | Format a string. ----- Note that this doesn't escape the string. Use 'fieldKey' to format field+-- Note that this doesn't escape the string. Use 'formatKey' to format field -- values in a query. -- -- >>> :t formatKey string@@ -240,7 +246,7 @@  -- | Format a UTF-8 encoded byte string. ----- Note that this doesn't escape the string. Use 'fieldKey' to format field+-- Note that this doesn't escape the string. Use 'formatKey' to format field -- values in a query. -- -- >>> :t formatKey byteString8

@@ -195,8 +195,8 @@  -- | Parse a RFC3339-formatted timestamp. ----- Note that this parser is slow as it converts a 'T.Text' input to a 'String'--- before parsing.+-- Note that this parser is slow as it converts a 'T.Text' input to a+-- 'Prelude.String' before parsing. parseRFC3339 :: ParseTime time => A.Value -> A.Parser time parseRFC3339 val = A.withText err   (maybe (A.typeMismatch err val) (return $!)

@@ -171,11 +171,11 @@ measurement :: Lens' (Line time) Measurement  -- | Tag(s) that you want to include with your data point. Tags are optional in--- the Line Protocol, so you can set it 'empty'.+-- the Line Protocol, so you can set it 'Control.Applicative.empty'. tagSet :: Lens' (Line time) (Map Key Key)  -- | Field(s) for your data point. Every data point requires at least one field--- in the Line Protocol, so it shouldn't be 'empty'.+-- in the Line Protocol, so it shouldn't be 'Control.Applicative.empty'. fieldSet :: Lens' (Line time) (Map Key LineField)  -- | Timestamp for your data point. You can put whatever type of timestamp that

@@ -31,6 +31,7 @@ -- $setup -- >>> :set -XOverloadedStrings -- >>> import Database.InfluxDB+-- >>> import qualified Database.InfluxDB.Format as F  -- | An InfluxDB query. --@@ -143,6 +144,13 @@ -- -- 'Database.InfluxDB.formatDatabase' can be used to construct a -- 'Database'.+--+-- >>> "test-db" :: Database+-- "test-db"+-- >>> formatDatabase "test-db"+-- "test-db"+-- >>> formatDatabase ("test-db-"%F.decimal) 0+-- "test-db-0" newtype Database = Database { databaseName :: Text } deriving (Eq, Ord)  instance IsString Database where@@ -155,6 +163,13 @@ -- -- 'Database.InfluxDB.formatMeasurement' can be used to construct a -- 'Measurement'.+--+-- >>> "test-series" :: Measurement+-- "test-series"+-- >>> formatMeasurement "test-series"+-- "test-series"+-- >>> formatMeasurement ("test-series-"%F.decimal) 0+-- "test-series-0" newtype Measurement = Measurement Text deriving (Eq, Ord)  instance IsString Measurement where@@ -166,6 +181,13 @@ -- | String type that is used for tag keys/values and field keys. -- -- 'Database.InfluxDB.formatKey' can be used to construct a 'Key'.+--+-- >>> "test-key" :: Key+-- "test-key"+-- >>> formatKey "test-key"+-- "test-key"+-- >>> formatKey ("test-key-"%F.decimal) 0+-- "test-key-0" newtype Key = Key Text deriving (Eq, Ord)  instance IsString Key where

@@ -8,7 +8,6 @@  import Database.InfluxDB import Database.InfluxDB.Line-import Database.InfluxDB.Write (writeByteString) import qualified Database.InfluxDB.Format as F  main :: IO ()