build: reset-timestamps: Include directories.

* guix/build/install.scm (reset-timestamps): Reset timestamps of
  directories as well.
This commit is contained in:
Ricardo Wurmus 2016-03-14 12:31:18 +01:00
parent 846e340954
commit e1a5615875

View file

@ -159,7 +159,7 @@ (define (reset-timestamps directory)
;; read-only store. ;; read-only store.
(unless (eq? (stat:type s) 'symlink) (unless (eq? (stat:type s) 'symlink)
(utime file 0 0 0 0)))) (utime file 0 0 0 0))))
(find-files directory ""))) (find-files directory #:directories? #t)))
(define* (register-closure store closure (define* (register-closure store closure
#:key (deduplicate? #t)) #:key (deduplicate? #t))