all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Leo Famulari <leo@famulari.name>
To: guix-devel@gnu.org
Subject: [PATCH 2/3] gnu: bash: Use 'install-file' instead of 'mkdir-p' and 'copy-file'.
Date: Sun, 18 Oct 2015 15:40:07 -0400	[thread overview]
Message-ID: <58209094355bba8d7e983078e718369ac6df1a46.1445196542.git.leo@famulari.name> (raw)
In-Reply-To: <cover.1445196542.git.leo@famulari.name>
In-Reply-To: <cover.1445196542.git.leo@famulari.name>

* gnu/packages/bash.scm (bash): Use 'install-file' instead of 'mkdir-p'
  and 'copy-file'.
---
 gnu/packages/bash.scm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/bash.scm b/gnu/packages/bash.scm
index e1ddd7c..c65f3c8 100644
--- a/gnu/packages/bash.scm
+++ b/gnu/packages/bash.scm
@@ -149,18 +149,11 @@ number/base32-hash tuples, directly usable in the 'patch-series' form."
                (mkdir-p include)
                (for-each (lambda (file)
                            (when ((@ (ice-9 regex) string-match) includes file)
-                             (let ((directory (string-append include)))
-                               (mkdir-p directory)
-                               (copy-file file
-                                          (string-append directory "/"
-                                                         (basename file)))))
+                             (install-file file include))
                            (when ((@ (ice-9 regex) string-match) headers file)
                              (let ((directory (string-append include "/"
                                                              (dirname file))))
-                               (mkdir-p directory)
-                               (copy-file file
-                                          (string-append directory "/"
-                                                         (basename file))))))
+                               (install-file file directory))))
                          (find-files "." "\\.h$"))
                (delete-file (string-append include "/" "y.tab.h"))
                #t)))
-- 
2.6.1

  parent reply	other threads:[~2015-10-18 19:40 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-10-18 19:40 [PATCH 0/3] Fix bash:include and build recutils' Bash builtin Leo Famulari
2015-10-18 19:40 ` [PATCH 1/3] gnu: bash: Install more headers in "include" output Leo Famulari
2015-10-21 19:22   ` Ludovic Courtès
2015-10-22 22:56     ` Leo Famulari
2015-10-18 19:40 ` Leo Famulari [this message]
2015-10-18 19:40 ` [PATCH 3/3] gnu: recutils: Build the Bash builtin, readrec Leo Famulari

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=58209094355bba8d7e983078e718369ac6df1a46.1445196542.git.leo@famulari.name \
    --to=leo@famulari.name \
    --cc=guix-devel@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.