build-system/perl: Lazily resolve (gnu packages perl).
* guix/build-system/perl.scm (default-perl): New procedure. (perl-build): Use it.
This commit is contained in:
		
							parent
							
								
									0ad7da1e90
								
							
						
					
					
						commit
						b421cebd6a
					
				
					 1 changed files with 8 additions and 1 deletions
				
			
		|  | @ -35,9 +35,16 @@ | ||||||
| ;; | ;; | ||||||
| ;; Code: | ;; 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 | (define* (perl-build store name source inputs | ||||||
|                      #:key |                      #:key | ||||||
|                      (perl (@ (gnu packages perl) perl)) |                      (perl (default-perl)) | ||||||
|                      (search-paths '()) |                      (search-paths '()) | ||||||
|                      (tests? #t) |                      (tests? #t) | ||||||
|                      (make-maker-flags ''()) |                      (make-maker-flags ''()) | ||||||
|  |  | ||||||
		Reference in a new issue