relational-query 0.8.1.0 → 0.8.2.0

raw patch · 3 files changed

+16/−2 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• relational-query.cabal +1/−1
• src/Database/Relational/Query/Pure.hs +11/−1

@@ -1,5 +1,9 @@ <!-- -*- Markdown -*- --> +## 0.8.2.0++- Add TIMESTAMPTZ literal of PostgreSQL.+ ## 0.8.1.0  - Add schemaNameMode configuration.

@@ -1,5 +1,5 @@ name:                relational-query-version:             0.8.1.0+version:             0.8.2.0 synopsis:            Typeful, Modular, Relational, algebraic query engine description:         This package contiains typeful relation structure and                      relational-algebraic query building DSL which can

@@ -29,7 +29,7 @@ import qualified Data.Text.Encoding as T import qualified Data.Text.Lazy as LT import Text.Printf (PrintfArg, printf)-import Data.Time (FormatTime, Day, TimeOfDay, LocalTime, formatTime)+import Data.Time (FormatTime, Day, TimeOfDay, LocalTime, UTCTime, ZonedTime, formatTime) import Data.Time.Locale.Compat (defaultTimeLocale)  import Language.SQL.Keyword (Keyword (..))@@ -159,6 +159,16 @@ -- | Constant SQL terms of 'LocalTime'. instance ShowConstantTermsSQL LocalTime where   showConstantTermsSQL' = constantTimeTerms TIMESTAMP "%Y-%m-%d %H:%M:%S"++-- | Constant SQL terms of 'ZonedTime'.+--   This generates ***NOT STANDARD*** SQL of TIMESTAMPTZ literal.+instance ShowConstantTermsSQL ZonedTime where+  showConstantTermsSQL' = constantTimeTerms TIMESTAMPTZ "%Y-%m-%d %H:%M:%S%z"++-- | Constant SQL terms of 'UTCTime'.+--   This generates ***NOT STANDARD*** SQL of TIMESTAMPTZ literal with UTC timezone.+instance ShowConstantTermsSQL UTCTime where+  showConstantTermsSQL' = constantTimeTerms TIMESTAMPTZ "%Y-%m-%d %H:%M:%S%z"  showMaybeTerms :: ShowConstantTermsSQL a => PersistableRecordWidth a -> Maybe a -> [StringSQL] showMaybeTerms wa = d  where