Only skip copying test files if the destination is at least as fresh.
authorPhilipp Marek <philipp@marek.priv.at>
Sat, 8 Mar 2014 20:20:28 +0000 (21:20 +0100)
committerPhilipp Marek <philipp@marek.priv.at>
Sat, 8 Mar 2014 20:21:29 +0000 (21:21 +0100)
src/tests/config.lsp.in

index 69ba7f8..21e9c57 100755 (executable)
   (loop for f in (directory (merge-pathnames *wild-inferiors* orig))
      for f2 = (enough-namestring f orig)
      for f3 = (merge-pathnames f2 dest)
-     unless (probe-file f3)
+     unless (and (probe-file f3)
+                 (>= (file-write-date f3)
+                     (file-write-date f2)))
      do (ensure-directories-exist f3)
      do (ext:copy-file f f3)))