hasbolt-extras 0.0.0.3 → 0.0.0.4
raw patch · 3 files changed
+9/−5 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG.md +6/−2
- hasbolt-extras.cabal +1/−1
- src/Database/Bolt/Extras/Query/Put.hs +2/−2
CHANGELOG.md view
@@ -6,11 +6,15 @@ ## [Unreleased] -## [0.1.0.3] - 2018-04-05+## [0.0.0.4] - 2018-04-05 ### Changed+- More accurate `toNode` on data fields with `Maybe a` type. If the corresponding field in the type is Nothing, this field won't be included to `Node`.++## [0.0.0.3] - 2018-04-05+### Changed - More accurate `fromNode` on data fields with `Maybe a` type. If there is no such field in Node, data field will be set to Nothing. -## [0.1.0.0] - 2018-02-22+## [0.0.0.0] - 2018-02-22 ### Added - Template Haskell code to generate `Node`s and `URelationship`s. - Simple queries to upload `Node` and `URelationship`.
hasbolt-extras.cabal view
@@ -1,5 +1,5 @@ name: hasbolt-extras-version: 0.0.0.3+version: 0.0.0.4 synopsis: Extras for hasbolt library description: Extras for hasbolt library homepage: https://github.com/biocad/hasbolt-extras#readme
src/Database/Bolt/Extras/Query/Put.hs view
@@ -16,7 +16,7 @@ import qualified Data.Map.Strict as M (map) import qualified Data.Text as T (Text, pack) import Database.Bolt (BoltActionT, Node (..),- RecordValue (..),+ RecordValue (..), Value (..), URelationship (..), at, exact, query) import Database.Bolt.Extras.Graph (Graph (..))@@ -58,7 +58,7 @@ let varQ = "n" let labelsQ = toCypher $ labels node- let propsQ = toCypher . toList $ nodeProps node+ let propsQ = toCypher . filter ((/= N ()) . snd) . toList $ nodeProps node let getQuery = [text|$q ($varQ $labelsQ {$propsQ}) RETURN ID($varQ) as $varQ|]