diff options
| author | Alex Kost <alezost@gmail.com> | 2015-11-04 21:51:46 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2015-11-12 21:22:35 +0300 |
| commit | cfa548b4ea459110d28a7424fa73535dd4b5fc41 (patch) | |
| tree | ced087e9c644ada33a32028de01b608ef17d1b43 | |
| parent | 959c78f69a498b1cc558d6c8e6bc3faa78dd5423 (diff) | |
| download | gnu-guix-cfa548b4ea459110d28a7424fa73535dd4b5fc41.tar gnu-guix-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.el | 5 |
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") |