Hello community,

here is the log from the commit of package ghc-turtle for openSUSE:Factory 
checked in at 2017-06-22 10:39:22
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-turtle (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-turtle.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-turtle"

Thu Jun 22 10:39:22 2017 rev:9 rq:504114 version:1.3.5

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-turtle/ghc-turtle.changes    2017-06-04 
01:55:47.466428035 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-turtle.new/ghc-turtle.changes       
2017-06-22 10:39:24.449959303 +0200
@@ -1,0 +2,10 @@
+Thu Jun  8 11:08:23 UTC 2017 - [email protected]
+
+- Update to version 1.3.5.
+
+-------------------------------------------------------------------
+Wed May 31 14:05:43 UTC 2017 - [email protected]
+
+- Update to version 1.3.4.
+
+-------------------------------------------------------------------

Old:
----
  turtle-1.3.3.tar.gz

New:
----
  turtle-1.3.5.tar.gz

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

Other differences:
------------------
++++++ ghc-turtle.spec ++++++
--- /var/tmp/diff_new_pack.xohuSJ/_old  2017-06-22 10:39:25.017879234 +0200
+++ /var/tmp/diff_new_pack.xohuSJ/_new  2017-06-22 10:39:25.021878671 +0200
@@ -19,7 +19,7 @@
 %global pkg_name turtle
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        1.3.3
+Version:        1.3.5
 Release:        0
 Summary:        Shell programming, Haskell-style
 License:        BSD-3-Clause

++++++ turtle-1.3.3.tar.gz -> turtle-1.3.5.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/turtle-1.3.3/CHANGELOG.md 
new/turtle-1.3.5/CHANGELOG.md
--- old/turtle-1.3.3/CHANGELOG.md       2017-04-29 23:11:56.000000000 +0200
+++ new/turtle-1.3.5/CHANGELOG.md       2017-05-31 23:49:57.000000000 +0200
@@ -1,3 +1,13 @@
+1.3.5
+
+* Increase upper bound on `foldl`
+
+1.3.4
+
+* Bug fix: `cptree` now correctly copies files instead of creating directories
+  of the same name
+* Increase upper bound on `criterion`
+
 1.3.3
 
 * Bug fix: Change `textToLines` to behave like `Data.Text.splitOn "\n"`
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/turtle-1.3.3/src/Turtle/Prelude.hs 
new/turtle-1.3.5/src/Turtle/Prelude.hs
--- old/turtle-1.3.3/src/Turtle/Prelude.hs      2017-04-29 23:11:56.000000000 
+0200
+++ new/turtle-1.3.5/src/Turtle/Prelude.hs      2017-05-31 23:49:57.000000000 
+0200
@@ -1034,9 +1034,9 @@
     -- directory
     Just suffix <- return (Filesystem.stripPrefix (oldTree </> "") oldPath)
     let newPath = newTree </> suffix
-    isFile <- testfile newPath
+    isFile <- testfile oldPath
     if isFile
-        then cp oldPath newPath
+        then mktree (Filesystem.directory newPath) >> cp oldPath newPath
         else mktree newPath )
 
 -- | Remove a file
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/turtle-1.3.3/test/cptree.hs 
new/turtle-1.3.5/test/cptree.hs
--- old/turtle-1.3.3/test/cptree.hs     1970-01-01 01:00:00.000000000 +0100
+++ new/turtle-1.3.5/test/cptree.hs     2017-05-31 23:49:57.000000000 +0200
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+import Turtle
+import Filesystem.Path.CurrentOS ()
+import System.IO.Temp (withSystemTempDirectory)
+import Control.Monad (unless)
+
+check :: String -> Bool-> IO ()
+check errorMessage successs = unless successs $ fail errorMessage
+
+main :: IO ()
+main = withSystemTempDirectory "tempDir" (runTest . fromString)
+
+runTest :: Turtle.FilePath -> IO ()
+runTest tempDir = do
+  let srcDirectory = tempDir </> "src"
+
+  mktree $ srcDirectory </> "directory"
+  touch $ srcDirectory </> "directory" </> "file"
+
+  let destDirectory = tempDir </> "dest"
+
+  cptree srcDirectory destDirectory
+
+  testdir (destDirectory </> "directory") >>= check "cptree did not preserve 
directory"
+  testfile (destDirectory </> "directory" </> "file") >>= check "cptree did 
not preserve directory"
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/turtle-1.3.3/turtle.cabal 
new/turtle-1.3.5/turtle.cabal
--- old/turtle-1.3.3/turtle.cabal       2017-04-29 23:11:56.000000000 +0200
+++ new/turtle-1.3.5/turtle.cabal       2017-05-31 23:49:57.000000000 +0200
@@ -1,5 +1,5 @@
 Name: turtle
-Version: 1.3.3
+Version: 1.3.5
 Cabal-Version: >=1.10
 Build-Type: Simple
 License: BSD3
@@ -55,7 +55,7 @@
         bytestring           >= 0.9.1.8 && < 0.11,
         clock                >= 0.4.1.2 && < 0.8 ,
         directory            >= 1.0.7   && < 1.4 ,
-        foldl                >= 1.1     && < 1.3 ,
+        foldl                >= 1.1     && < 1.4 ,
         hostname                           < 1.1 ,
         managed              >= 1.0.3   && < 1.1 ,
         process              >= 1.0.1.1 && < 1.5 ,
@@ -119,6 +119,18 @@
         base   >= 4 && < 5,
         turtle
 
+test-suite cptree
+    Type: exitcode-stdio-1.0
+    HS-Source-Dirs: test
+    Main-Is: cptree.hs
+    GHC-Options: -Wall -threaded
+    Default-Language: Haskell2010
+    Build-Depends:
+        base   >= 4 && < 5,
+        temporary,
+        system-filepath >= 0.4,
+        turtle
+
 benchmark bench
     Type: exitcode-stdio-1.0
     HS-Source-Dirs: bench
@@ -132,4 +144,4 @@
     if impl(ghc < 7.8)
         Build-Depends: criterion >= 0.4 && < 1.1.4.0
     else
-        Build-Depends: criterion >= 0.4 && < 1.2
+        Build-Depends: criterion >= 0.4 && < 1.3


Reply via email to