TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

build-system/gnu: Do not patch symlinks.

Browse source 
This fixes location-aware scripts.

* guix/build/gnu-build-system.scm (patch-shebangs)[list-of-files]: Use
'lstat' instead of 'stat'.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Jan Nieuwenhuizen 2016-02-06 15:59:51 +01:00 committed by Ludovic Courtès
parent 939c5c31d6
commit c13a9feb5b
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
guix/build/gnu-build-system.scm
View file

@ -303,7 +303,7 @@ (define* (patch-shebangs #:key inputs outputs (patch-shebangs? #t)
(define (list-of-files dir) (define (list-of-files dir)
(map (cut string-append dir "/" <>) (map (cut string-append dir "/" <>)
(or (scandir dir (lambda (f) (or (scandir dir (lambda (f)
(let ((s (stat (string-append dir "/" f)))) (let ((s (lstat (string-append dir "/" f))))
(eq? 'regular (stat:type s))))) (eq? 'regular (stat:type s)))))
'()))) '())))