postgresql-simple 0.3.3.1 → 0.3.3.2

raw patch · 5 files changed

+6/−7 lines, 5 files

Files

postgresql-simple.cabal +2/−2
src/Database/PostgreSQL/Simple/HStore/Implementation.hs +1/−1
src/Database/PostgreSQL/Simple/Internal.hs +0/−2
src/Database/PostgreSQL/Simple/Notification.hs +2/−2
src/Database/PostgreSQL/Simple/Types.hs +1/−0

postgresql-simple.cabal view

@@ -1,5 +1,5 @@ Name:                postgresql-simple-Version:             0.3.3.1+Version:             0.3.3.2 Synopsis:            Mid-Level PostgreSQL client library Description:     Mid-Level PostgreSQL client library, forked from mysql-simple.@@ -75,7 +75,7 @@ source-repository this   type:     git   location: http://github.com/lpsmith/postgresql-simple-  tag:      v0.3.3.1+  tag:      v0.3.3.2  test-suite test   type:           exitcode-stdio-1.0

src/Database/PostgreSQL/Simple/HStore/Implementation.hs view

@@ -143,7 +143,7 @@ newtype HStoreMap  = HStoreMap (Map Text Text) deriving (Eq, Ord, Typeable, Show)  instance ToHStore HStoreMap where-    toHStore (HStoreMap xs) = Map.foldWithKey f mempty xs+    toHStore (HStoreMap xs) = Map.foldrWithKey f mempty xs       where f k v xs = hstore k v `mappend` xs  instance ToField HStoreMap where

src/Database/PostgreSQL/Simple/Internal.hs view

@@ -22,8 +22,6 @@  module Database.PostgreSQL.Simple.Internal where -import Prelude hiding (catch)- import           Control.Applicative import           Control.Exception import           Control.Concurrent.MVar

src/Database/PostgreSQL/Simple/Notification.hs view

@@ -18,10 +18,10 @@ -- -- Note that on Windows,  @getNotification@ currently uses a polling loop -- of 1 second to check for more notifications,  due to some inadequacies--- in GHC's IO implementation and interface on that platform.   See GHC +-- in GHC's IO implementation and interface on that platform.   See GHC -- issue #7353 for more information.  While this workaround is less than -- ideal,  notifications are still better than polling the database directly.--- Notifications do not create any extra work for the backend,  and are +-- Notifications do not create any extra work for the backend,  and are -- likely cheaper on the client side as well. -- -- <http://hackage.haskell.org/trac/ghc/ticket/7353>

src/Database/PostgreSQL/Simple/Types.hs view

@@ -80,6 +80,7 @@     mempty = Query B.empty     mappend (Query a) (Query b) = Query (B.append a b)     {-# INLINE mappend #-}+    mconcat xs = Query (B.concat (map fromQuery xs))  -- | A single-value \"collection\". --