aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2017-08-01 23:02:26 +0300
committerEfraim Flashner <efraim@flashner.co.il>2017-08-01 23:02:26 +0300
commita60667245f7b31abba5cb5bb4e5a435816b82950 (patch)
treef2f55e31a7919504dca1ffe907abd9ca8d8d1583
parentd0386db49327c312c2957e3453d9f12fb5863113 (diff)
downloadgnu-guix-a60667245f7b31abba5cb5bb4e5a435816b82950.tar
gnu-guix-a60667245f7b31abba5cb5bb4e5a435816b82950.tar.gz
guix package: Allow `guix package -u' to fuction as before.
This is a follow up to 6ddf97f81bb99a73f00e30ad5fc19577872b5b49 * guix/scripts/package.scm (%options) <"-u">: Only check for a flag when there is an ARG after '-u'.
-rw-r--r--guix/scripts/package.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index b6133b6af0..fa45bd48a6 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -486,7 +486,7 @@ Install, remove, or upgrade packages in a single transaction.\n"))
arg-handler))))
(option '(#\u "upgrade") #f #t
(lambda (opt name arg result arg-handler)
- (when (string-prefix? "-" arg)
+ (when (and arg (string-prefix? "-" arg))
(warning (G_ "upgrade regexp '~a' looks like a \
command-line option~%")
arg)