04/05: emacs: Use (guix scripts lint) only when needed.

[Alex Kost]

alezost pushed a commit to branch master
in repository guix.

commit 619ff9066d92f061fe17ab31748fa53d4648a697
Author: Alex Kost <address@hidden>
Date:   Thu Mar 31 21:36:18 2016 +0300

    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.
---
 emacs/guix-main.scm |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/emacs/guix-main.scm b/emacs/guix-main.scm
index eb79adb..925d2b2 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."