From 1bdb63e73b73a6b581b65c4018aae587aebfcab4 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Mon, 18 Nov 2019 22:59:21 +0100
Subject: deploy: Handle "--version".

* guix/scripts/deploy.scm (%options): Add "--version".
---
 guix/scripts/deploy.scm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'guix/scripts')

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
-- 
cgit v1.2.3