summary refs log tree commit diff
path: root/emacs/guix-command.el
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 /emacs/guix-command.el
parent959c78f69a498b1cc558d6c8e6bc3faa78dd5423 (diff)
downloadguix-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.
Diffstat (limited to 'emacs/guix-command.el')
-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")