From ef1ee6b2213d0a9a6ead79c8c9aba1d94e1e42fa Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Mon, 19 Nov 2012 23:41:17 +0100 Subject: guix-build: Use `location->string'. * guix-build.in (derivations-from-package-expressions): Use `location->string'. --- guix-build.in | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'guix-build.in') diff --git a/guix-build.in b/guix-build.in index 3b1e6c3115..72386ac511 100644 --- a/guix-build.in +++ b/guix-build.in @@ -57,9 +57,8 @@ When SOURCE? is true, return the derivations of the package sources." (loc (package-location p))) (if source (package-source-derivation %store source) - (leave (_ "~a:~a:~a: error: package `~a' has no source~%") - (location-file loc) (location-line loc) - (location-column loc) (package-name p)))) + (leave (_ "~a: error: package `~a' has no source~%") + (location->string loc) (package-name p)))) (package-derivation %store p system)) (leave (_ "expression `~s' does not evaluate to a package~%") exp)))) -- cgit v1.2.3