03/03: gnu: lvm2: Make sure compiled objects are stripped.

[Leo Famulari]

lfam pushed a commit to branch master
in repository guix.

commit 7ca97fae366b5ac8324a774d8aa09c2a36348666
Author: Leo Famulari <address@hidden>
Date:   Mon Oct 3 04:26:17 2016 -0400

    gnu: lvm2: Make sure compiled objects are stripped.
    
    * gnu/packages/linux.scm (lvm2)[arguments]: Add 'make-objects-writeable' 
phase.
---
 gnu/packages/linux.scm |   12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 431e73d..0e9fab2 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -1671,7 +1671,17 @@ time.")
 
              ;; Replace /bin/sh with the right file name.
              (patch-makefile-SHELL "make.tmpl")
-             #t)))
+             #t))
+         (add-before 'strip 'make-objects-writable
+           (lambda* (#:key outputs #:allow-other-keys)
+             ;; Make compiled objects writable so they can be stripped.
+             (let ((out (assoc-ref outputs "out")))
+               (for-each (lambda (file)
+                           (chmod file #o755))
+                         (append
+                           (find-files (string-append out "/lib"))
+                           (find-files (string-append out "/sbin"))))
+               #t))))
 
        #:configure-flags (list (string-append "--sysconfdir="
                                               (assoc-ref %outputs "out")