~ruther/guix-local: emacs: Use "r" key for 'cran' action in 'import' popup.

d1f80aa401a331072f5c4b837d81c659fe6b5fd1 — Alex Kost 10 years ago 3555771

emacs: Use "r" key for 'cran' action in 'import' popup.

* emacs/guix-command.el (guix-command-improve-import-argument): New
  variable and function.
  (guix-command-argument-improvers): Add it.

patch browse .tar.gz

1 files changed, 6 insertions(+), 0 deletions(-)

M emacs/guix-command.el

M emacs/guix-command.el => emacs/guix-command.el +6 -0

@@ 209,6 209,10 @@ to be modified."
   '(("--type" :fun guix-read-graph-type)))
 
 (guix-command-define-argument-improver
+    guix-command-improve-import-argument
+  '(("cran" :char ?r)))
+
+(guix-command-define-argument-improver
     guix-command-improve-import-elpa-argument
   '(("--archive" :fun guix-read-elpa-archive)))
 


@@ 275,6 279,8 @@ to be modified."
      guix-command-improve-gc-argument)
     (("graph")
      guix-command-improve-graph-argument)
+    (("import")
+     guix-command-improve-import-argument)
     (("import" "gnu")
      guix-command-improve-key-policy-argument)
     (("import" "elpa")