From 64a967cc9c4563f8ebb8dbc34e9026f8e5e2d883 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Sun, 3 Nov 2013 23:09:30 +0100 Subject: ui: Make '--version' output GCS-compliant. * guix/ui.scm (show-version-and-exit): Display copyright year, license, and LACK OF WARRANTY. --- guix/ui.scm | 5 +++++ 1 file changed, 5 insertions(+) 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 @@ (define* (show-version-and-exit #:optional (command (car (command-line)))) "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 +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) -- cgit v1.2.3