From 0040140d34fc12c5205d806c5e8dfee627cb1b83 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Mon, 26 Jun 2017 22:51:14 +0200
Subject: [PATCH] guix package: Allow '--rollback', after all.

* guix/scripts/package.scm (%options): Add "rollback" as an alias for
"roll-back".
---
 guix/scripts/package.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index 400623d41b..58da3113a0 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -496,7 +496,7 @@ Install, remove, or upgrade packages in a single transaction.\n"))
                                  (alist-cons 'do-not-upgrade arg result)
                                  result)
                              arg-handler))))
-         (option '("roll-back") #f #f
+         (option '("roll-back" "rollback") #f #f
                  (lambda (opt name arg result arg-handler)
                    (values (alist-cons 'roll-back? #t result)
                            #f)))