From patchwork Fri Sep 30 12:21:57 2016 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: =?utf-8?b?5a6L5paH5q2m?= X-Patchwork-Id: 16159 Received: (qmail 66241 invoked by uid 89); 30 Sep 2016 12:58:47 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Checked: by ClamAV 0.99.2 on sourceware.org X-Virus-Found: No X-Spam-SWARE-Status: No, score=-4.7 required=5.0 tests=AWL, BAYES_00, FREEMAIL_FROM, RP_MATCHES_RCVD, SPF_PASS autolearn=ham version=3.3.2 spammy= X-Spam-Status: No, score=-4.7 required=5.0 tests=AWL, BAYES_00, FREEMAIL_FROM, RP_MATCHES_RCVD, SPF_PASS autolearn=ham version=3.3.2 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on sourceware.org X-Spam-Level: X-HELO: lists.gnu.org Received: from lists.gnu.org (HELO lists.gnu.org) (208.118.235.17) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 30 Sep 2016 12:58:45 +0000 Received: from localhost ([::1]:44332 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bpxOl-00086G-1w for patchwork@sourceware.org; Fri, 30 Sep 2016 08:58:43 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:45983) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bpwp8-0008Tr-DW for guix-devel@gnu.org; Fri, 30 Sep 2016 08:21:58 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bpwp3-0001MQ-EH for guix-devel@gnu.org; Fri, 30 Sep 2016 08:21:53 -0400 Received: from mail2.openmailbox.org ([62.4.1.33]:49643) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bpwp3-0001Lm-7z for guix-devel@gnu.org; Fri, 30 Sep 2016 08:21:49 -0400 Received: by mail2.openmailbox.org (Postfix, from userid 1001) id 3E3B3105CA1; Fri, 30 Sep 2016 14:21:48 +0200 (CEST) From: =?UTF-8?q?=E5=AE=8B=E6=96=87=E6=AD=A6?= To: guix-devel@gnu.org Subject: [PATCH] gnu: shroud: Wrap 'shroud' with 'GUILE_LOAD_COMPILED_PATH'. Date: Fri, 30 Sep 2016 20:21:57 +0800 Message-Id: <20160930122157.4495-1-iyzsong@gmail.com> X-Mailer: git-send-email 2.10.0 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 62.4.1.33 X-BeenThere: guix-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: =?UTF-8?q?=E5=AE=8B=E6=96=87=E6=AD=A6?= Errors-To: guix-devel-bounces+patchwork=sourceware.org@gnu.org Sender: "Guix-devel" * gnu/packages/password-utils.scm (shroud)[arguments]: New field. --- gnu/packages/password-utils.scm | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/gnu/packages/password-utils.scm b/gnu/packages/password-utils.scm index d2410c6..30b538d 100644 --- a/gnu/packages/password-utils.scm +++ b/gnu/packages/password-utils.scm @@ -109,6 +109,17 @@ algorithms AES or Twofish.") (base32 "1y43yhgy2zbrk5bqj3qyx9rkcz2bma9sinlrg7dip3jqms9gq4lr")))) (build-system gnu-build-system) + (arguments + '(#:phases + (modify-phases %standard-phases + (add-after 'install 'wrap-shroud + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (ccachedir (string-append out "/lib/guile/2.0/ccache")) + (prog (string-append out "/bin/shroud"))) + (wrap-program prog + `("GUILE_LOAD_COMPILED_PATH" ":" prefix (,ccachedir))) + #t)))))) (inputs `(("guile" ,guile-2.0) ("gnupg" ,gnupg)