sr-extra 1.46.3.1 → 1.46.3.2

raw patch · 2 files changed

+4/−4 lines, 2 filesdep ~directory

Dependency ranges changed: directory

Files

• Extra/Files.hs +3/−3
• sr-extra.cabal +1/−1

@@ -33,7 +33,7 @@ import		 System.Unix.Directory import		 System.Directory import		 System.IO.Error hiding (try, catch)-import		 System.Posix.Files+import		 System.Posix.Files as SPF  -- | Return the list of subdirectories, omitting . and .. and ignoring -- symbolic links.@@ -43,7 +43,7 @@     return . filter (not . (flip elem) [".", ".."]) >>=     filterM isRealDirectory     where-      isRealDirectory name = getSymbolicLinkStatus (path ++ "/" ++ name) >>= return . not . isSymbolicLink+      isRealDirectory name = getSymbolicLinkStatus (path ++ "/" ++ name) >>= return . not . SPF.isSymbolicLink  -- |Atomically install a list of files.  Returns a list of what went -- wrong on failure.  Will throw an error if it fails and is unable to@@ -224,7 +224,7 @@     where       checkExists = doesDirectoryExist path >>= orCreate       checkType False = return False-      checkType True = getSymbolicLinkStatus path >>= return . isSymbolicLink >>= orReplace+      checkType True = getSymbolicLinkStatus path >>= return . SPF.isSymbolicLink >>= orReplace       checkContent False = return ()       checkContent True = readSymbolicLink path >>= return . (== name) >>= orReplace >> return ()       orReplace True = return True

@@ -1,5 +1,5 @@ Name:           sr-extra-Version:        1.46.3.1+Version:        1.46.3.2 License:        BSD3 License-File:	COPYING Author:         David Fox