Use on-disk file mod times in generated jars. Allows require to use jar-stored AOT compilations.

This commit is contained in:
Stephen Compall 2010-03-09 11:30:50 -05:00 committed by Phil Hagelberg
parent d11eae7451
commit c99d28e7b0

View file

@ -45,7 +45,8 @@
(when-not (skip-file? child)
(let [path (reduce trim-leading-str (unix-path (str child))
[root resources classes src "/"])]
(.putNextEntry jar-os (JarEntry. path))
(.putNextEntry jar-os (doto (JarEntry. path)
(.setTime (.lastModified child))))
(copy child jar-os))))))
(defmethod copy-to-jar :bytes [project jar-os spec]