Hello community,

here is the log from the commit of package ghc-relational-query for 
openSUSE:Factory checked in at 2017-05-06 18:28:59
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-relational-query (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-relational-query.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-relational-query"

Sat May  6 18:28:59 2017 rev:5 rq:491506 version:0.8.3.6

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/ghc-relational-query/ghc-relational-query.changes    
    2017-03-14 10:05:54.485805484 +0100
+++ 
/work/SRC/openSUSE:Factory/.ghc-relational-query.new/ghc-relational-query.changes
   2017-05-06 18:28:59.424823896 +0200
@@ -1,0 +2,5 @@
+Sun Apr  9 18:08:09 UTC 2017 - psim...@suse.com
+
+- Update to version 0.8.3.6 with cabal2obs.
+
+-------------------------------------------------------------------

Old:
----
  relational-query-0.8.3.5.tar.gz

New:
----
  relational-query-0.8.3.6.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-relational-query.spec ++++++
--- /var/tmp/diff_new_pack.AntI7R/_old  2017-05-06 18:29:00.048735859 +0200
+++ /var/tmp/diff_new_pack.AntI7R/_new  2017-05-06 18:29:00.052735295 +0200
@@ -19,7 +19,7 @@
 %global pkg_name relational-query
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        0.8.3.5
+Version:        0.8.3.6
 Release:        0
 Summary:        Typeful, Modular, Relational, algebraic query engine
 License:        BSD-3-Clause

++++++ relational-query-0.8.3.5.tar.gz -> relational-query-0.8.3.6.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/relational-query-0.8.3.5/ChangeLog.md 
new/relational-query-0.8.3.6/ChangeLog.md
--- old/relational-query-0.8.3.5/ChangeLog.md   2017-02-14 16:46:48.000000000 
+0100
+++ new/relational-query-0.8.3.6/ChangeLog.md   2017-04-04 09:32:05.000000000 
+0200
@@ -1,5 +1,9 @@
 <!-- -*- Markdown -*- -->
 
+## 0.8.3.6
+
+- Bugfix of lazy instances of ShowConstantTermsSQL.
+
 ## 0.8.3.5
 
 - Deprecate some exported interfaces which are internal definitions.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/relational-query-0.8.3.5/relational-query.cabal 
new/relational-query-0.8.3.6/relational-query.cabal
--- old/relational-query-0.8.3.5/relational-query.cabal 2017-02-14 
16:46:48.000000000 +0100
+++ new/relational-query-0.8.3.6/relational-query.cabal 2017-04-04 
09:32:05.000000000 +0200
@@ -1,5 +1,5 @@
 name:                relational-query
-version:             0.8.3.5
+version:             0.8.3.6
 synopsis:            Typeful, Modular, Relational, algebraic query engine
 description:         This package contiains typeful relation structure and
                      relational-algebraic query building DSL which can
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/relational-query-0.8.3.5/src/Database/Relational/Query/Pure.hs 
new/relational-query-0.8.3.6/src/Database/Relational/Query/Pure.hs
--- old/relational-query-0.8.3.5/src/Database/Relational/Query/Pure.hs  
2017-02-14 16:46:48.000000000 +0100
+++ new/relational-query-0.8.3.6/src/Database/Relational/Query/Pure.hs  
2017-04-04 09:32:05.000000000 +0200
@@ -28,6 +28,7 @@
 import qualified Data.Text as T
 import qualified Data.Text.Encoding as T
 import qualified Data.Text.Lazy as LT
+import qualified Data.Text.Lazy.Encoding as LT
 import Text.Printf (PrintfArg, printf)
 import Data.Time (FormatTime, Day, TimeOfDay, LocalTime, UTCTime, ZonedTime, 
formatTime)
 import Data.Time.Locale.Compat (defaultTimeLocale)
@@ -111,7 +112,7 @@
 
 -- | Constant SQL terms of 'LB.ByteString'.
 instance ShowConstantTermsSQL LB.ByteString where
-  showConstantTermsSQL' = mconcat . map showConstantTermsSQL' . LB.toChunks
+  showConstantTermsSQL' = stringTermsSQL . LT.unpack . LT.decodeUtf8
 
 -- | Constant SQL terms of 'Text'.
 instance ShowConstantTermsSQL Text where
@@ -119,7 +120,7 @@
 
 -- | Constant SQL terms of 'LT.Text'.
 instance ShowConstantTermsSQL LT.Text where
-  showConstantTermsSQL' = mconcat . map showConstantTermsSQL' . LT.toChunks
+  showConstantTermsSQL' = stringTermsSQL . LT.unpack
 
 -- | Constant SQL terms of 'Char'.
 instance ShowConstantTermsSQL Char where


Reply via email to