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:
parent
7d0978f56f
commit
619ff9066d
|
@ -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."
|
||||||
|
|
Loading…
Reference in New Issue