[commit: packages/directory] master: Fix typo in setFileTimes (4beb371)

git at git.haskell.org git at git.haskell.org
Tue Apr 19 06:57:50 UTC 2016


Repository : ssh://git@git.haskell.org/directory

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/4beb37153d837b0215851752bcc42ba1e8784194/directory

>---------------------------------------------------------------

commit 4beb37153d837b0215851752bcc42ba1e8784194
Author: Phil Ruffwind <rf at rufflewind.com>
Date:   Sun Apr 17 11:50:24 2016 -0400

    Fix typo in setFileTimes


>---------------------------------------------------------------

4beb37153d837b0215851752bcc42ba1e8784194
 System/Directory.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/System/Directory.hs b/System/Directory.hs
index 469ed2b..0e08f5f 100644
--- a/System/Directory.hs
+++ b/System/Directory.hs
@@ -1554,10 +1554,10 @@ setFileTimes path (atime, mtime) =
 # if MIN_VERSION_unix(2, 7, 0)
     setFileTimes' = Posix.setFileTimesHiRes
 #  else
-    setFileTimes' pth atim mtime =
+    setFileTimes' pth atime' mtime' =
       Posix.setFileTimes pth
-        (fromInteger (truncate atime))
-        (fromInteger (truncate mtime))
+        (fromInteger (truncate atime'))
+        (fromInteger (truncate mtime'))
 # endif
 #endif
 



More information about the ghc-commits mailing list