build-system/gnu: Strip only ELF files.
Suggested by Mark H Weaver <mhw@netris.org> at <http://lists.gnu.org/archive/html/guix-devel/2014-10/msg00395.html>. * guix/build/gnu-build-system.scm (strip)[strip-dir]: Strip only when (elf-file? PATH) is true.
This commit is contained in:
parent
99533da50d
commit
50b87bd54b
|
@ -343,7 +343,8 @@ makefiles."
|
|||
debug-output objcopy-command))
|
||||
(file-system-fold (const #t)
|
||||
(lambda (path stat result) ; leaf
|
||||
(and (or (not debug-output)
|
||||
(and (elf-file? path)
|
||||
(or (not debug-output)
|
||||
(make-debug-file path))
|
||||
(zero? (apply system* strip-command
|
||||
(append strip-flags (list path))))
|
||||
|
|
Loading…
Reference in New Issue