diff options
| author | Alex Kost <alezost@gmail.com> | 2015-10-28 21:11:36 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2015-11-02 15:51:40 +0300 |
| commit | 6407ce8ea1b67024e50273b7d6a1773a16a42322 (patch) | |
| tree | 31b1547a930dff2b4536d4c82f160670b39b5c5a /emacs/guix-main.scm | |
| parent | 762b1971d8e21ffbc46d28b37c9bace64c2369bc (diff) | |
| download | guix-6407ce8ea1b67024e50273b7d6a1773a16a42322.tar guix-6407ce8ea1b67024e50273b7d6a1773a16a42322.tar.gz | |
emacs: Add completions for '--type' option of 'refresh' popup.
* guix/scripts/refresh.scm: Export '%updaters'.
* emacs/guix-main.scm (refresh-updater-names): New procedure.
* emacs/guix-base.el (guix-refresh-updater-names): New function.
* emacs/guix-read.el (guix-read-refresh-updater-names,
guix-read-refresh-updater-names-string): New functions.
* emacs/guix-command.el (guix-command-improve-refresh-argument): Use
'guix-read-refresh-updater-names-string'.
Diffstat (limited to 'emacs/guix-main.scm')
| -rw-r--r-- | emacs/guix-main.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/emacs/guix-main.scm b/emacs/guix-main.scm index e29a0a0acc..9eac5185b7 100644 --- a/emacs/guix-main.scm +++ b/emacs/guix-main.scm @@ -991,6 +991,11 @@ Return #t if the shell command was executed successfully." "Return a list of names of available graph node types." (map node-type-name %node-types)) +(define (refresh-updater-names) + "Return a list of names of available refresh updater types." + (map (@ (guix upstream) upstream-updater-name) + (@ (guix scripts refresh) %updaters))) + (define (lint-checker-names) "Return a list of names of available lint checkers." (map (lambda (checker) |