From 36eef80d45ae754ba42a761ffc97e38cc7253bd0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 9 Sep 2019 10:19:59 +0200
Subject: [PATCH] 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.
---
guix/packages.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/guix/packages.scm b/guix/packages.scm
index 143417b8611..b92ed0ab0cd 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -351,7 +351,7 @@ (define (goto port line column)
(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))
--
GitLab