summaryrefslogtreecommitdiff
path: root/emacs
diff options
context:
space:
mode:
authorAlex Kost <alezost@gmail.com>2016-03-31 21:36:18 +0300
committerAlex Kost <alezost@gmail.com>2016-04-04 20:11:22 +0300
commit619ff9066d92f061fe17ab31748fa53d4648a697 (patch)
treebae8584c7e07bf678bdaa42e45199a59db77d83a /emacs
parent7d0978f56f33717eb355bf6812c5dd3d02a1676d (diff)
downloadpatches-619ff9066d92f061fe17ab31748fa53d4648a697.tar
patches-619ff9066d92f061fe17ab31748fa53d4648a697.tar.gz
emacs: Use (guix scripts lint) only when needed.
* emacs/guix-main.scm: Do not use (guix scripts pull) module. (lint-checker-names): Adjust to use it.
Diffstat (limited to 'emacs')
-rw-r--r--emacs/guix-main.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/guix-main.scm b/emacs/guix-main.scm
index eb79adb475..925d2b2b40 100644
--- a/emacs/guix-main.scm
+++ b/emacs/guix-main.scm
@@ -58,7 +58,6 @@
(guix licenses)
(guix utils)
(guix ui)
- (guix scripts lint)
(guix scripts package)
(gnu packages)
(gnu system))
@@ -1022,8 +1021,9 @@ Return #t if the shell command was executed successfully."
(define (lint-checker-names)
"Return a list of names of available lint checkers."
(map (lambda (checker)
- (symbol->string (lint-checker-name checker)))
- %checkers))
+ (symbol->string ((@ (guix scripts lint) lint-checker-name)
+ checker)))
+ (@ (guix scripts lint) %checkers)))
(define (package-names)
"Return a list of names of available packages."