aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlex Kost <alezost@gmail.com>2015-11-04 21:51:46 +0300
committerAlex Kost <alezost@gmail.com>2015-11-12 21:22:35 +0300
commitcfa548b4ea459110d28a7424fa73535dd4b5fc41 (patch)
treeced087e9c644ada33a32028de01b608ef17d1b43
parent959c78f69a498b1cc558d6c8e6bc3faa78dd5423 (diff)
downloadpatches-cfa548b4ea459110d28a7424fa73535dd4b5fc41.tar
patches-cfa548b4ea459110d28a7424fa73535dd4b5fc41.tar.gz
emacs: Adjust 'guix container' popup.
* emacs/guix-command.el (guix-command-improve-action-argument): Use "C" key for 'container' action to distinguish it from 'challenge'. (guix-command-rest-argument): Add positional arguments.
-rw-r--r--emacs/guix-command.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/emacs/guix-command.el b/emacs/guix-command.el
index ea294611e0..5e5cff630c 100644
--- a/emacs/guix-command.el
+++ b/emacs/guix-command.el
@@ -131,7 +131,8 @@ to be modified."
(guix-command-define-argument-improver
guix-command-improve-action-argument
- '(("graph" :char ?G)
+ '(("container" :char ?C)
+ ("graph" :char ?G)
("environment" :char ?E)
("publish" :char ?u)
("pull" :char ?P)
@@ -369,6 +370,8 @@ to be modified."
'("archive" "build" "challenge" "edit" "environment"
"graph" "lint" "refresh"))
(argument :doc "Packages" :fun 'guix-read-package-names-string))
+ ((equal commands '("container" "exec"))
+ (argument :doc "PID Command [Args...]"))
((string= command "download")
(argument :doc "URL"))
((string= command "gc")