From c4ca12c15b27cc13b747c184abde1e9de3c46606 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sat, 27 Apr 2013 22:52:43 +0200
Subject: [PATCH] gnu-maintenance: Fix error message of
`update-package-source'.
* guix/gnu-maintenance.scm (update-package-source): In the (not loc)
case, pass the location first and convert it to a string.
---
guix/gnu-maintenance.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm
index c66d5f75cad..96b0a57a5c1 100644
--- a/guix/gnu-maintenance.scm
+++ b/guix/gnu-maintenance.scm
@@ -438,6 +438,7 @@ (define (update-source file old-version version
(begin
(format (current-error-port)
(_ "~a: ~a: no `version' field in source; skipping~%")
- name (package-location package))))))
+ (location->string (package-location package))
+ name)))))
;;; gnu-maintenance.scm ends here
--
GitLab