From b421cebd6adbbadf6ad9aa000ca6605b1a4b2380 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Sat, 12 Oct 2013 22:28:15 +0200 Subject: build-system/perl: Lazily resolve (gnu packages perl). * guix/build-system/perl.scm (default-perl): New procedure. (perl-build): Use it. --- guix/build-system/perl.scm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'guix/build-system/perl.scm') diff --git a/guix/build-system/perl.scm b/guix/build-system/perl.scm index 6661689efb..eac8f53d3e 100644 --- a/guix/build-system/perl.scm +++ b/guix/build-system/perl.scm @@ -35,9 +35,16 @@ (define-module (guix build-system perl) ;; ;; Code: +(define (default-perl) + "Return the default Perl package." + + ;; Do not use `@' to avoid introducing circular dependencies. + (let ((module (resolve-interface '(gnu packages perl)))) + (module-ref module 'perl))) + (define* (perl-build store name source inputs #:key - (perl (@ (gnu packages perl) perl)) + (perl (default-perl)) (search-paths '()) (tests? #t) (make-maker-flags ''()) -- cgit v1.2.3