Simplify, rename, document some predicates

composewell · Jul 25, 2022 · eefe965 · eefe965
1 parent 3cbe49e
commit eefe965
Show file tree

Hide file tree

Showing 2 changed files with 143 additions and 156 deletions.
diff --git a/src/Streamly/Coreutils/Cp.hs b/src/Streamly/Coreutils/Cp.hs
@@ -110,7 +110,7 @@ cpShouldOverwrite option src dest =
         OverwriteUpdate -> do
             r <- test dest isExisting
             if r
-            then test src =<< isNewerThan dest
+            then test src =<< cmpModifyTime (>) dest
             else return True
 
 -- | @cp option-modifier source destination@. Copy a file or directory.