[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/05: emacs: Use (guix scripts lint) only when needed.
From: |
Alex Kost |
Subject: |
04/05: emacs: Use (guix scripts lint) only when needed. |
Date: |
Mon, 04 Apr 2016 18:16:20 +0000 |
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."