diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-11-18 22:59:21 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-11-19 10:51:53 +0100 |
| commit | 1bdb63e73b73a6b581b65c4018aae587aebfcab4 (patch) | |
| tree | 78a4f68d646ba5adc5d945a8e753859cf184242d | |
| parent | 6fbd8fde2fad113dbfc90c8b1b55f7ead919a90a (diff) | |
| download | patches-1bdb63e73b73a6b581b65c4018aae587aebfcab4.tar patches-1bdb63e73b73a6b581b65c4018aae587aebfcab4.tar.gz | |
deploy: Handle "--version".
* guix/scripts/deploy.scm (%options): Add "--version".
| -rw-r--r-- | guix/scripts/deploy.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/guix/scripts/deploy.scm b/guix/scripts/deploy.scm index f311587ec3..27b7e4fd1c 100644 --- a/guix/scripts/deploy.scm +++ b/guix/scripts/deploy.scm @@ -62,6 +62,10 @@ Perform the deployment specified by FILE.\n")) (lambda args (show-help) (exit 0))) + (option '(#\V "version") #f #f + (lambda args + (show-version-and-exit "guix deploy"))) + (option '(#\s "system") #t #f (lambda (opt name arg result) (alist-cons 'system arg |