From 2938a2013f8eb801c66120ec339f54deae085cc7 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Sun, 23 Jul 2023 02:00:00 +0200 Subject: gnu: perl-db-file: Use G-expressions. * gnu/packages/databases.scm (perl-db-file)[arguments]: Rewrite as G-expressions, using THIS-PACKAGE-INPUT. --- gnu/packages/databases.scm | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) (limited to 'gnu/packages/databases.scm') diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm index efb00e40c6..5ce3c1d8c8 100644 --- a/gnu/packages/databases.scm +++ b/gnu/packages/databases.scm @@ -2786,15 +2786,17 @@ database.") (sha256 (base32 "1xm7s2ag15498kp7g8r20gxk22ncz3b3hz4b3srqf7ypif3a5dyf")))) (build-system perl-build-system) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + (add-before 'configure 'modify-config.in + (lambda _ + (substitute* "config.in" + (("/usr/local/BerkeleyDB") + #$(this-package-input "bdb")))))))) (inputs (list bdb)) (native-inputs (list perl-test-pod)) - (arguments - `(#:phases (modify-phases %standard-phases - (add-before - 'configure 'modify-config.in - (lambda* (#:key inputs #:allow-other-keys) - (substitute* "config.in" - (("/usr/local/BerkeleyDB") (assoc-ref inputs "bdb")))))))) (home-page "https://metacpan.org/release/DB_File") (synopsis "Perl5 access to Berkeley DB version 1.x") (description -- cgit v1.2.3