comment
svn: r16326
This commit is contained in:
parent
e1d2fdb3d6
commit
e64bfff4f3
|
@ -94,6 +94,7 @@
|
|||
(copy-directory/files dir/f f)]
|
||||
[(or (<= (file-or-directory-modify-seconds f)
|
||||
(file-or-directory-modify-seconds dir/f))
|
||||
;; just in case, check the size too:
|
||||
(and (file-exists? f) (file-exists? dir/f)
|
||||
(not (= (file-size f) (file-size dir/f)))))
|
||||
;; f is newer in dir than in the working directory
|
||||
|
|
Loading…
Reference in New Issue
Block a user