[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/04: build-system/gnu: Strip 'ar' archives as well.
|
From: |
Ludovic Courtès |
|
Subject: |
03/04: build-system/gnu: Strip 'ar' archives as well. |
|
Date: |
Sat, 22 Nov 2014 20:57:24 +0000 |
civodul pushed a commit to branch core-updates
in repository guix.
commit e8c7fdda5d62af08820794114e02a6f247fed2f7
Author: Ludovic Courtès <address@hidden>
Date: Sat Nov 22 21:54:27 2014 +0100
build-system/gnu: Strip 'ar' archives as well.
* guix/build/gnu-build-system.scm (strip): Also strip when (ar-file?
PATH) is true.
---
guix/build/gnu-build-system.scm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm
index a813606..dbbb71a 100644
--- a/guix/build/gnu-build-system.scm
+++ b/guix/build/gnu-build-system.scm
@@ -343,7 +343,7 @@ makefiles."
debug-output objcopy-command))
(file-system-fold (const #t)
(lambda (path stat result) ; leaf
- (and (elf-file? path)
+ (and (or (elf-file? path) (ar-file? path))
(or (not debug-output)
(make-debug-file path))
(zero? (apply system* strip-command