aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-11-03 23:09:30 +0100
committerLudovic Courtès <ludo@gnu.org>2013-11-03 23:09:30 +0100
commit64a967cc9c4563f8ebb8dbc34e9026f8e5e2d883 (patch)
tree1ea48339eefa1261c982b5e8634045bfac6f5f8d
parenta18e58336c4421ecb9da92e386250bfece06192d (diff)
downloadpatches-64a967cc9c4563f8ebb8dbc34e9026f8e5e2d883.tar
patches-64a967cc9c4563f8ebb8dbc34e9026f8e5e2d883.tar.gz
ui: Make '--version' output GCS-compliant.
* guix/ui.scm (show-version-and-exit): Display copyright year, license, and LACK OF WARRANTY.
-rw-r--r--guix/ui.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index ddc93f9db4..8a28574c3c 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -137,6 +137,11 @@ messages."
"Display version information for COMMAND and `(exit 0)'."
(simple-format #t "~a (~a) ~a~%"
command %guix-package-name %guix-version)
+ (display (_ "Copyright (C) 2013 the Guix authors
+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.
+There is NO WARRANTY, to the extent permitted by law.
+"))
(exit 0))
(define (show-bug-report-information)