diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-11-04 00:09:49 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-11-04 00:12:20 +0100 |
| commit | f856fcb558eb59f9bb0d4b0651bd7508370321f4 (patch) | |
| tree | be5b1abd5c7d80a8ab842eb4d7826575319680be | |
| parent | 32728adb958560268b793b4a3e48d94111b5ed2d (diff) | |
build-system/python: 'package-with-python2' preserves source location.
* guix/build-system/python.scm (package-with-explicit-python): Add
'location' field.
| -rw-r--r-- | guix/build-system/python.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/build-system/python.scm b/guix/build-system/python.scm index 1a5d9df473d..2532210a493 100644 --- a/guix/build-system/python.scm +++ b/guix/build-system/python.scm | |||
| @@ -92,6 +92,7 @@ NEW-PREFIX; otherwise, NEW-PREFIX is prepended to the name." | |||
| 92 | (if (eq? (package-build-system p) python-build-system) | 92 | (if (eq? (package-build-system p) python-build-system) |
| 93 | (package | 93 | (package |
| 94 | (inherit p) | 94 | (inherit p) |
| 95 | (location (package-location p)) | ||
| 95 | (name (let ((name (package-name p))) | 96 | (name (let ((name (package-name p))) |
| 96 | (string-append new-prefix | 97 | (string-append new-prefix |
| 97 | (if (string-prefix? old-prefix name) | 98 | (if (string-prefix? old-prefix name) |