03/10: database: 'reset-timestamps' now correctly handles symlinks.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit e5e5119855b0269e8e6507b90c7f4d7df5118fc8
Author: Ludovic Courtès <address@hidden>
Date:   Tue Jul 3 11:02:22 2018 +0200

    database: 'reset-timestamps' now correctly handles symlinks.
    
    * guix/store/database.scm (reset-timestamps): Use 'utime' with
    AT_SYMLINK_NOFOLLOW for symlinks.
---
 guix/store/database.scm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/guix/store/database.scm b/guix/store/database.scm
index 05b2ba6..8f35b63 100644
--- a/guix/store/database.scm
+++ b/guix/store/database.scm
@@ -209,9 +209,7 @@ it's a directory.  While at it, canonicalize file 
permissions."
                                 (type type))))))
                    (scandir* parent))))
       ((symlink)
-       ;; FIXME: Implement bindings for 'futime' to reset the timestamps on
-       ;; symlinks.
-       #f)
+       (utime file 0 0 0 0 AT_SYMLINK_NOFOLLOW))
       (else
        (chmod file (if (executable-file? file) #o555 #o444))
        (utime file 0 0 0 0)))))