From 4082f8ed342b74e8ceee1bc114186a7d9ce352e7 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Mon, 19 Feb 2018 23:21:12 +0100 Subject: gnu: bzip2: Use install-file. * gnu/packages/compression.scm (bzip2)[arguments]: Use simpler install-file instead of copy-file. Remove let binding for (now) single-use basename. --- gnu/packages/compression.scm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'gnu/packages/compression.scm') diff --git a/gnu/packages/compression.scm b/gnu/packages/compression.scm index 8f958a385b..03b364d5ca 100644 --- a/gnu/packages/compression.scm +++ b/gnu/packages/compression.scm @@ -272,11 +272,9 @@ (define-public bzip2 (let* ((out (assoc-ref outputs "out")) (libdir (string-append out "/lib"))) (for-each (lambda (file) - (let ((base (basename file))) - (format #t "installing `~a' to `~a'~%" - base libdir) - (copy-file file - (string-append libdir "/" base)))) + (format #t "installing `~a' to `~a'~%" + (basename file) libdir) + (install-file file libdir)) (find-files "." "^libbz2\\.so"))) #t)) (add-after 'install-shared-lib 'patch-scripts -- cgit v1.2.3