Skip to content
Snippets Groups Projects
Commit e1a56158 authored by Ricardo Wurmus's avatar Ricardo Wurmus
Browse files

build: reset-timestamps: Include directories.

* guix/build/install.scm (reset-timestamps): Reset timestamps of
  directories as well.
parent 846e3409
No related branches found
No related tags found
No related merge requests found
...@@ -159,7 +159,7 @@ (define (reset-timestamps directory) ...@@ -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))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment