diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2014-08-17 21:08:06 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-08-17 21:08:06 +0200 |
| commit | c90ddc8f811496e9da9ea1e6832a662bf767d6d9 (patch) | |
| tree | 59e5ab505210a6190517292efc2ff49015b55e59 /guix/monads.scm | |
| parent | 4231f05bbc29e4e3deffc9106a5faf14920979d3 (diff) | |
| download | gnu-guix-c90ddc8f811496e9da9ea1e6832a662bf767d6d9.tar gnu-guix-c90ddc8f811496e9da9ea1e6832a662bf767d6d9.tar.gz | |
monads: 'package-file' uses '%current-system' at '>>=' time.
* guix/monads.scm (package-file): Leave #:system to #f by default.
* tests/monads.scm ("package-file, default system"): New test.
Diffstat (limited to 'guix/monads.scm')
| -rw-r--r-- | guix/monads.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/guix/monads.scm b/guix/monads.scm index 8909312a87..c714941a0c 100644 --- a/guix/monads.scm +++ b/guix/monads.scm @@ -379,8 +379,7 @@ permission bits are kept." (define* (package-file package #:optional file #:key - (system (%current-system)) - (output "out") target) + system (output "out") target) "Return as a monadic value the absolute file name of FILE within the OUTPUT directory of PACKAGE. When FILE is omitted, return the name of the OUTPUT directory of PACKAGE. When TARGET is true, use it as a |