06/07: lint: Export 'run-checkers'.

[Alex Kost]

alezost pushed a commit to branch master
in repository guix.

commit e04741f160e77fe41d02129011bc2bb20ad27669
Author: Alex Kost <address@hidden>
Date:   Thu Oct 1 21:10:16 2015 +0300

    lint: Export 'run-checkers'.
    
    * guix/scripts/lint.scm (run-checkers): Export.  Make 'checkers'
      argument optional.
---
 guix/scripts/lint.scm |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm
index 3b4ff72..b1707ad 100644
--- a/guix/scripts/lint.scm
+++ b/guix/scripts/lint.scm
@@ -62,6 +62,7 @@
             check-source-file-name
             check-license
             check-formatting
+            run-checkers
 
             %checkers
             lint-checker
@@ -709,8 +710,8 @@ or a list thereof")
      (description "Look for formatting issues in the source")
      (check       check-formatting))))
 
-(define (run-checkers package checkers)
-  ;; Run the given CHECKERS on PACKAGE.
+(define* (run-checkers package #:optional (checkers %checkers))
+  "Run the given CHECKERS on PACKAGE."
   (let ((tty? (isatty? (current-error-port)))
         (name (package-full-name package)))
     (for-each (lambda (checker)