[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/03: emacs: Adjust 'guix container' popup.
From: |
Alex Kost |
Subject: |
02/03: emacs: Adjust 'guix container' popup. |
Date: |
Thu, 12 Nov 2015 18:24:19 +0000 |
alezost pushed a commit to branch master
in repository guix.
commit cfa548b4ea459110d28a7424fa73535dd4b5fc41
Author: Alex Kost <address@hidden>
Date: Wed Nov 4 21:51:46 2015 +0300
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.
---
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 ea29461..5e5cff6 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")