08/11: upstream: Use 'warning' instead of 'format'.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 1c26219f94b388a35f0ae93060806319958906ef
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Jul 20 21:16:17 2020 +0200

    upstream: Use 'warning' instead of 'format'.
    
    * guix/upstream.scm (update-package-source): Use 'warning' instead of 
'format'.
---
 guix/upstream.scm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/guix/upstream.scm b/guix/upstream.scm
index ff33c53..6a57bad 100644
--- a/guix/upstream.scm
+++ b/guix/upstream.scm
@@ -26,6 +26,7 @@
                 #:select (download-to-store url-fetch))
   #:use-module (guix gnupg)
   #:use-module (guix packages)
+  #:use-module (guix diagnostics)
   #:use-module (guix ui)
   #:use-module (guix base32)
   #:use-module (guix gexp)
@@ -477,10 +478,8 @@ new version string if an update was made, and #f 
otherwise."
                 (warning (G_ "~a: could not locate source file")
                          (location-file loc))
                 #f)))
-        (begin
-          (format (current-error-port)
-                  (G_ "~a: ~a: no `version' field in source; skipping~%")
-                  (location->string (package-location package))
-                  name)))))
+        (warning (package-location package)
+                 (G_ "~a: no `version' field in source; skipping~%")
+                 name))))
 
 ;;; upstream.scm ends here