me
/
guix
Archived
1
0
Fork 0
Code

upstream: Use 'warning' instead of 'format'. 

* guix/upstream.scm (update-package-source): Use 'warning' instead of 'format'.
master
Ludovic Courtès 2020-07-20 21:16:17 +02:00
parent 36a5efd967
commit 1c26219f94
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
guix/upstream.scm
View File

@ -26,6 +26,7 @@
#:select (download-to-store url-fetch)) #:select (download-to-store url-fetch))
#:use-module (guix gnupg) #:use-module (guix gnupg)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix diagnostics)
#:use-module (guix ui) #:use-module (guix ui)
#:use-module (guix base32) #:use-module (guix base32)
#:use-module (guix gexp) #: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") (warning (G_ "~a: could not locate source file")
(location-file loc)) (location-file loc))
#f))) #f)))
(begin (warning (package-location package)
(format (current-error-port) (G_ "~a: no `version' field in source; skipping~%")
(G_ "~a: ~a: no `version' field in source; skipping~%") name))))
(location->string (package-location package))
name)))))
;;; upstream.scm ends here ;;; upstream.scm ends here