Hello community,

here is the log from the commit of package ghc-code-page for openSUSE:Factory 
checked in at 2017-05-10 20:48:01
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-code-page (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-code-page.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-code-page"

Wed May 10 20:48:01 2017 rev:2 rq:489353 version:0.1.3

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-code-page/ghc-code-page.changes      
2017-04-12 18:05:39.615514171 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-code-page.new/ghc-code-page.changes 
2017-05-10 20:48:05.011454734 +0200
@@ -1,0 +2,5 @@
+Mon Mar 27 12:38:09 UTC 2017 - [email protected]
+
+- Update to version 0.1.3 with cabal2obs.
+
+-------------------------------------------------------------------

Old:
----
  code-page-0.1.2.tar.gz

New:
----
  code-page-0.1.3.tar.gz

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

Other differences:
------------------
++++++ ghc-code-page.spec ++++++
--- /var/tmp/diff_new_pack.HdxN6G/_old  2017-05-10 20:48:06.071305182 +0200
+++ /var/tmp/diff_new_pack.HdxN6G/_new  2017-05-10 20:48:06.071305182 +0200
@@ -18,7 +18,7 @@
 
 %global pkg_name code-page
 Name:           ghc-%{pkg_name}
-Version:        0.1.2
+Version:        0.1.3
 Release:        0
 Summary:        Windows code page library for Haskell
 License:        BSD-3-Clause

++++++ code-page-0.1.2.tar.gz -> code-page-0.1.3.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/code-page-0.1.2/CHANGELOG.md 
new/code-page-0.1.3/CHANGELOG.md
--- old/code-page-0.1.2/CHANGELOG.md    2017-02-20 15:02:01.000000000 +0100
+++ new/code-page-0.1.3/CHANGELOG.md    2017-03-16 02:18:44.000000000 +0100
@@ -1,3 +1,6 @@
+### 0.1.3 [2017.03.15]
+* Fix the build on GHC 7.8 and older
+
 ### 0.1.2 [2017.02.20]
 * Squash minor bug in fixCodePage (the same bug reported in
   https://github.com/commercialhaskell/stack/pull/3002)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/code-page-0.1.2/code-page.cabal 
new/code-page-0.1.3/code-page.cabal
--- old/code-page-0.1.2/code-page.cabal 2017-02-20 15:02:01.000000000 +0100
+++ new/code-page-0.1.3/code-page.cabal 2017-03-16 02:18:44.000000000 +0100
@@ -1,5 +1,5 @@
 name:                code-page
-version:             0.1.2
+version:             0.1.3
 synopsis:            Windows code page library for Haskell
 description:         This library provides two modules:
                      .
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/code-page-0.1.2/src/System/IO/CodePage.hs 
new/code-page-0.1.3/src/System/IO/CodePage.hs
--- old/code-page-0.1.2/src/System/IO/CodePage.hs       2017-02-20 
15:02:01.000000000 +0100
+++ new/code-page-0.1.3/src/System/IO/CodePage.hs       2017-03-16 
02:18:44.000000000 +0100
@@ -31,6 +31,7 @@
 #ifdef WINDOWS
 import           Control.Exception (bracket_)
 import           Control.Monad (when)
+import           Data.Foldable (forM_)
 import           System.IO (hGetEncoding, hPutStrLn, hSetEncoding, stderr, 
stdin, stdout)
 import qualified System.Win32.CodePage as Win32 (CodePage)
 import           System.Win32.CodePage hiding (CodePage)
@@ -116,7 +117,7 @@
                     )
                 (do
                     setConsoleCP origCPI
-                    mapM_ (hSetEncoding stdin) mbOrigStdinEnc
+                    forM_ mbOrigStdinEnc $ hSetEncoding stdin
                     )
             | otherwise = id
         fixOutput
@@ -128,8 +129,8 @@
                     )
                 (do
                     setConsoleOutputCP origCPO
-                    mapM_ (hSetEncoding stdout) mbOrigStdoutEnc
-                    mapM_ (hSetEncoding stderr) mbOrigStderrEnc
+                    forM_ mbOrigStdoutEnc $ hSetEncoding stdout
+                    forM_ mbOrigStderrEnc $ hSetEncoding stderr
                     )
             | otherwise = id
 


Reply via email to