build-system/perl: Lazily resolve (gnu packages perl).

* guix/build-system/perl.scm (default-perl): New procedure. (perl-build): Use it.
2013-10-12 22:28:15 +02:00 · 2013-10-12 22:28:15 +02:00 · b421cebd6a
commit b421cebd6a
parent 0ad7da1e90
1 changed files with 8 additions and 1 deletions
--- a/guix/build-system/perl.scm
+++ b/guix/build-system/perl.scm
@ -35,9 +35,16 @@
 ;;
 ;; 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 ''())