diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-09-09 10:19:59 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-09-10 00:34:40 +0200 |
commit | 36eef80d45ae754ba42a761ffc97e38cc7253bd0 (patch) | |
tree | 4bb35911dfbe1ef06a81a7d5861e38b322c97a74 | |
parent | 5fbba846964f72e69cc26aacce9f35301ca13c35 (diff) | |
download | patches-36eef80d45ae754ba42a761ffc97e38cc7253bd0.tar patches-36eef80d45ae754ba42a761ffc97e38cc7253bd0.tar.gz |
packages: 'package-field-location' really catches 'system-error.
This had been wrong since forever (i.e., 2013).
* guix/packages.scm (package-field-location): Catch 'system-error, not
'system.
-rw-r--r-- | guix/packages.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/packages.scm b/guix/packages.scm index 143417b861..b92ed0ab0c 100644 --- a/guix/packages.scm +++ b/guix/packages.scm @@ -351,7 +351,7 @@ object." (match (package-location package) (($ <location> file line column) - (catch 'system + (catch 'system-error (lambda () ;; In general we want to keep relative file names for modules. (with-fluids ((%file-port-name-canonicalization 'relative)) |