Hello community,
here is the log from the commit of package ghc-temporary for openSUSE:Factory
checked in at 2015-05-21 08:12:11
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-temporary (Old)
and /work/SRC/openSUSE:Factory/.ghc-temporary.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-temporary"
Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-temporary/ghc-temporary.changes
2014-11-26 20:55:32.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.ghc-temporary.new/ghc-temporary.changes
2015-05-21 08:12:12.000000000 +0200
@@ -1,0 +2,6 @@
+Wed Apr 22 10:33:42 UTC 2015 - mimi...@gmail.com
+
+- update to 1.2.0.3
+* no upstream changelog
+
+-------------------------------------------------------------------
Old:
----
_service
temporary-1.1.2.5.tar.gz
New:
----
temporary-1.2.0.3.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-temporary.spec ++++++
--- /var/tmp/diff_new_pack.aWkTuJ/_old 2015-05-21 08:12:12.000000000 +0200
+++ /var/tmp/diff_new_pack.aWkTuJ/_new 2015-05-21 08:12:12.000000000 +0200
@@ -1,7 +1,7 @@
#
# spec file for package ghc-temporary
#
-# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -19,7 +19,7 @@
%global pkg_name temporary
Name: ghc-temporary
-Version: 1.1.2.5
+Version: 1.2.0.3
Release: 0
Summary: Haskell portable temporary file and directory support
License: BSD-3-Clause
@@ -33,7 +33,9 @@
BuildRequires: ghc-rpm-macros
# Begin cabal-rpm deps:
BuildRequires: ghc-directory-devel
+BuildRequires: ghc-exceptions-devel
BuildRequires: ghc-filepath-devel
+BuildRequires: ghc-transformers-devel
BuildRequires: ghc-unix-devel
# End cabal-rpm deps
++++++ temporary-1.1.2.5.tar.gz -> temporary-1.2.0.3.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/temporary-1.1.2.5/System/IO/Temp.hs
new/temporary-1.2.0.3/System/IO/Temp.hs
--- old/temporary-1.1.2.5/System/IO/Temp.hs 2013-12-25 11:54:43.000000000
+0100
+++ new/temporary-1.2.0.3/System/IO/Temp.hs 2014-05-11 14:22:06.000000000
+0200
@@ -11,8 +11,9 @@
-- file in the Cabal checkout.
-import qualified Control.Exception as Exception
+import Control.Monad.Catch as Exception
+import Control.Monad.IO.Class
import System.Directory
import System.IO
@@ -21,21 +22,23 @@
-- | Create and use a temporary directory in the system standard temporary
directory.
--
--- Behaves exactly the same as 'withTempDirectory', except that the parent
temporary directory
+-- Behaves exactly the same as 'withTempFile', except that the parent
temporary directory
-- will be that returned by 'getTemporaryDirectory'.
-withSystemTempFile :: String -- ^ File name template. See 'openTempFile'.
- -> (FilePath -> Handle -> IO a) -- ^ Callback that can use
the file
- -> IO a
-withSystemTempFile template action = getTemporaryDirectory >>= \tmpDir ->
withTempFile tmpDir template action
+withSystemTempFile :: (MonadIO m, MonadMask m) =>
+ String -- ^ File name template. See 'openTempFile'.
+ -> (FilePath -> Handle -> m a) -- ^ Callback that can use
the file
+ -> m a
+withSystemTempFile template action = liftIO getTemporaryDirectory >>= \tmpDir
-> withTempFile tmpDir template action
-- | Create and use a temporary directory in the system standard temporary
directory.
--
-- Behaves exactly the same as 'withTempDirectory', except that the parent
temporary directory
-- will be that returned by 'getTemporaryDirectory'.
-withSystemTempDirectory :: String -- ^ Directory name template. See
'openTempFile'.
- -> (FilePath -> IO a) -- ^ Callback that can use the
directory
- -> IO a
-withSystemTempDirectory template action = getTemporaryDirectory >>= \tmpDir ->
withTempDirectory tmpDir template action
+withSystemTempDirectory :: (MonadIO m, MonadMask m) =>
+ String -- ^ Directory name template. See
'openTempFile'.
+ -> (FilePath -> m a) -- ^ Callback that can use the
directory
+ -> m a
+withSystemTempDirectory template action = liftIO getTemporaryDirectory >>=
\tmpDir -> withTempDirectory tmpDir template action
-- | Use a temporary filename that doesn't already exist.
@@ -47,14 +50,15 @@
--
-- The @tmpFlie@ will be file in the given directory, e.g.
-- @src/sdist.342@.
-withTempFile :: FilePath -- ^ Temp dir to create the file in
+withTempFile :: (MonadIO m, MonadMask m) =>
+ FilePath -- ^ Temp dir to create the file in
-> String -- ^ File name template. See 'openTempFile'.
- -> (FilePath -> Handle -> IO a) -- ^ Callback that can use the
file
- -> IO a
+ -> (FilePath -> Handle -> m a) -- ^ Callback that can use the file
+ -> m a
withTempFile tmpDir template action =
Exception.bracket
- (openTempFile tmpDir template)
- (\(name, handle) -> hClose handle >> ignoringIOErrors (removeFile name))
+ (liftIO (openTempFile tmpDir template))
+ (\(name, handle) -> liftIO (hClose handle >> ignoringIOErrors (removeFile
name)))
(uncurry action)
-- | Create and use a temporary directory.
@@ -66,14 +70,15 @@
--
-- The @tmpDir@ will be a new subdirectory of the given directory, e.g.
-- @src/sdist.342@.
-withTempDirectory :: FilePath -- ^ Temp directory to create the directory in
+withTempDirectory :: (MonadMask m, MonadIO m) =>
+ FilePath -- ^ Temp directory to create the directory in
-> String -- ^ Directory name template. See 'openTempFile'.
- -> (FilePath -> IO a) -- ^ Callback that can use the
directory
- -> IO a
+ -> (FilePath -> m a) -- ^ Callback that can use the directory
+ -> m a
withTempDirectory targetDir template =
Exception.bracket
- (createTempDirectory targetDir template)
- (ignoringIOErrors . removeDirectoryRecursive)
+ (liftIO (createTempDirectory targetDir template))
+ (liftIO . ignoringIOErrors . removeDirectoryRecursive)
-ignoringIOErrors :: IO () -> IO ()
+ignoringIOErrors :: MonadCatch m => m () -> m ()
ignoringIOErrors ioe = ioe `Exception.catch` (\e -> const (return ()) (e ::
IOError))
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/temporary-1.1.2.5/temporary.cabal
new/temporary-1.2.0.3/temporary.cabal
--- old/temporary-1.1.2.5/temporary.cabal 2013-12-25 11:54:43.000000000
+0100
+++ new/temporary-1.2.0.3/temporary.cabal 2014-05-11 14:22:06.000000000
+0200
@@ -1,5 +1,5 @@
name: temporary
-version: 1.1.2.5
+version: 1.2.0.3
cabal-version: >= 1.6
synopsis: Portable temporary file and directory support for Windows
and Unix, based on code from Cabal
description: The functions for creating temporary files and
directories in the base library are quite limited. The unixutils
@@ -22,7 +22,8 @@
exposed-modules: System.IO.Temp
other-modules: Distribution.Compat.Exception
Distribution.Compat.TempFile
- build-depends: base >= 3 && < 6, filepath >= 1.1 && < 1.4, directory >=
1.0 && < 1.3
-
+ build-depends: base >= 3 && < 10, filepath >= 1.1, directory >= 1.0,
+ transformers >= 0.2.0.0, exceptions >= 0.6
+
if !os(windows)
- build-depends: unix >= 2.3 && < 2.8
+ build-depends: unix >= 2.3
