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.
This commit is contained in:
Alex Kost 2016-03-31 21:36:18 +03:00
parent 7d0978f56f
commit 619ff9066d
1 changed files with 3 additions and 3 deletions

View File

@ -58,7 +58,6 @@
(guix licenses) (guix licenses)
(guix utils) (guix utils)
(guix ui) (guix ui)
(guix scripts lint)
(guix scripts package) (guix scripts package)
(gnu packages) (gnu packages)
(gnu system)) (gnu system))
@ -1022,8 +1021,9 @@ Return #t if the shell command was executed successfully."
(define (lint-checker-names) (define (lint-checker-names)
"Return a list of names of available lint checkers." "Return a list of names of available lint checkers."
(map (lambda (checker) (map (lambda (checker)
(symbol->string (lint-checker-name checker))) (symbol->string ((@ (guix scripts lint) lint-checker-name)
%checkers)) checker)))
(@ (guix scripts lint) %checkers)))
(define (package-names) (define (package-names)
"Return a list of names of available packages." "Return a list of names of available packages."