selda 0.1.10.0 → 0.1.10.1

raw patch · 3 files changed

+7/−5 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +5/−0
• selda.cabal +1/−1
• src/Database/Selda/Query.hs +1/−4

@@ -1,6 +1,11 @@ # Revision history for Selda  +## 0.1.10.1 -- 2017-08-11++* Fix name generation in the presence of multiple aggregates.++ ## 0.1.10.0 -- 2017-08-01  * Async exception safety.

@@ -1,5 +1,5 @@ name:                selda-version:             0.1.10.0+version:             0.1.10.1 synopsis:            Type-safe, high-level EDSL for interacting with relational databases. description:         This package provides an EDSL for writing portable, type-safe, high-level                      database code. Its feature set includes querying and modifying databases,

@@ -96,14 +96,11 @@           => Query (Inner s) a           -> Query s (OuterCols a) aggregate q = Query $ do-  -- Run query in isolation, then rename the remaining vars and generate outer-  -- query.-  st <- get   (gst, aggrs) <- isolate q   cs <- mapM rename $ unAggrs aggrs   let sql = state2sql gst       sql' = SQL cs (Product [sql]) [] (groupCols gst) [] Nothing-  put $ st {sources = sql' : sources st}+  modify $ \st -> st {sources = sql' : sources st}   pure $ toTup [n | Named n _ <- cs]  -- | Perform a @LEFT JOIN@ with the current result set (i.e. the outer query)