From c8817d11011dc85c8523daa9ba3ec4676ab37e8a Mon Sep 17 00:00:00 2001 From: Marius Bakke Date: Fri, 21 Jun 2019 17:49:32 +0200 Subject: gnu: perl: Remove obsolete workaround. * gnu/packages/perl.scm (perl)[arguments]: Remove phase "make-shared-objects-writable". --- gnu/packages/perl.scm | 12 ------------ 1 file changed, 12 deletions(-) (limited to 'gnu/packages/perl.scm') diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm index 47eeb48b5e..86bbeabf86 100644 --- a/gnu/packages/perl.scm +++ b/gnu/packages/perl.scm @@ -116,18 +116,6 @@ (define-public perl (lambda* (#:key configure-flags #:allow-other-keys) (format #t "Perl configure flags: ~s~%" configure-flags) (apply invoke "./Configure" configure-flags))) - (add-before - 'strip 'make-shared-objects-writable - (lambda* (#:key outputs #:allow-other-keys) - ;; The 'lib/perl5' directory contains ~50 MiB of .so. Make them - ;; writable so that 'strip' actually strips them. - (let* ((out (assoc-ref outputs "out")) - (lib (string-append out "/lib"))) - (for-each (lambda (dso) - (chmod dso #o755)) - (find-files lib "\\.so$")) - #t))) - (add-after 'install 'remove-extra-references (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) -- cgit v1.2.3