diff options
| author | Alex Kost <alezost@gmail.com> | 2015-10-20 16:43:49 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2015-10-27 21:54:57 +0300 |
| commit | e1d331863469d09d104f78839a03c0a736697cbc (patch) | |
| tree | 54ff2f90f0b27fc8c15f7e63686bc1fa4edb6ff3 | |
| parent | 402d73bc75f8410d27c87217fb85a9223c27a5aa (diff) | |
| download | guix-e1d331863469d09d104f78839a03c0a736697cbc.tar guix-e1d331863469d09d104f78839a03c0a736697cbc.tar.gz | |
emacs: Add "Packages" option for 'guix challenge' popup.
* emacs/guix-command.el (guix-command-rest-argument): Add "challenge".
| -rw-r--r-- | emacs/guix-command.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/emacs/guix-command.el b/emacs/guix-command.el index 1a42594b68..36ce7bcb09 100644 --- a/emacs/guix-command.el +++ b/emacs/guix-command.el @@ -364,8 +364,9 @@ to be modified." :name "-- " :char ?= :option? t args))) (let ((command (car commands))) (cond - ((member command '("archive" "build" "graph" "edit" - "environment" "lint" "refresh")) + ((member command + '("archive" "build" "challenge" "edit" "environment" + "graph" "lint" "refresh")) (argument :doc "Packages" :fun 'guix-read-package-names-string)) ((string= command "download") (argument :doc "URL")) |