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.
This commit is contained in:
parent
959c78f69a
commit
cfa548b4ea
|
@ -131,7 +131,8 @@ to be modified."
|
||||||
|
|
||||||
(guix-command-define-argument-improver
|
(guix-command-define-argument-improver
|
||||||
guix-command-improve-action-argument
|
guix-command-improve-action-argument
|
||||||
'(("graph" :char ?G)
|
'(("container" :char ?C)
|
||||||
|
("graph" :char ?G)
|
||||||
("environment" :char ?E)
|
("environment" :char ?E)
|
||||||
("publish" :char ?u)
|
("publish" :char ?u)
|
||||||
("pull" :char ?P)
|
("pull" :char ?P)
|
||||||
|
@ -369,6 +370,8 @@ to be modified."
|
||||||
'("archive" "build" "challenge" "edit" "environment"
|
'("archive" "build" "challenge" "edit" "environment"
|
||||||
"graph" "lint" "refresh"))
|
"graph" "lint" "refresh"))
|
||||||
(argument :doc "Packages" :fun 'guix-read-package-names-string))
|
(argument :doc "Packages" :fun 'guix-read-package-names-string))
|
||||||
|
((equal commands '("container" "exec"))
|
||||||
|
(argument :doc "PID Command [Args...]"))
|
||||||
((string= command "download")
|
((string= command "download")
|
||||||
(argument :doc "URL"))
|
(argument :doc "URL"))
|
||||||
((string= command "gc")
|
((string= command "gc")
|
||||||
|
|
Loading…
Reference in New Issue