amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

ui: Handle EPIPE errors when displaying Guix version.

Browse source 
Fixes <https://issues.guix.gnu.org/66254>.
Reported by Clément Lassieur <clement@lassieur.org>.

* guix/ui.scm (show-version-and-exit): Handle EPIPE errors when displaying
version.
This commit is contained in:
Simon Tournier 2023-10-12 15:39:03 +02:00
parent 48f9484483
commit b4d1eb53c0
No known key found for this signature in database
GPG key ID: 92F1D22C608EE7E5
1 changed files with 11 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

3
guix/ui.scm
View file

@ -552,6 +552,7 @@ See the \"Application Setup\" section in the manual, for more info.\n"))
(define* (show-version-and-exit #:optional (command (car (command-line)))) (define* (show-version-and-exit #:optional (command (car (command-line))))
"Display version information for COMMAND and `(exit 0)'." "Display version information for COMMAND and `(exit 0)'."
(leave-on-EPIPE
(simple-format #t "~a (~a) ~a~%" (simple-format #t "~a (~a) ~a~%"
command %guix-package-name %guix-version) command %guix-package-name %guix-version)
(format #t "Copyright ~a 2023 ~a" (format #t "Copyright ~a 2023 ~a"
@ -564,7 +565,7 @@ See the \"Application Setup\" section in the manual, for more info.\n"))
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html> License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it. This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law. There is NO WARRANTY, to the extent permitted by law.
")) ")))
(exit 0)) (exit 0))
(define (show-bug-report-information) (define (show-bug-report-information)