aboutsummaryrefslogtreecommitdiff
path: root/guix/scripts/lint.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-09-03 09:01:28 +0200
committerLudovic Courtès <ludo@gnu.org>2014-09-03 15:43:07 +0200
commitb002e9d08eb909e9fa1a84b0feed1662dce0bd3f (patch)
tree227cb75678fe38ee923168be4b97abc8c20025f1 /guix/scripts/lint.scm
parent52bd0810a86396e961ca4c92f7e9e5ea0e8c547b (diff)
downloadgnu-guix-b002e9d08eb909e9fa1a84b0feed1662dce0bd3f.tar
gnu-guix-b002e9d08eb909e9fa1a84b0feed1662dce0bd3f.tar.gz
guix lint: Remove "guix lint: " prefix from warnings.
This allows editors to parse warnings correctly. * guix/scripts/lint.scm (emit-warning): Use 'format' instead of 'warning', to avoid the "guix lint: " prefix in messages. * tests/lint.scm (call-with-warnings): Indent.
Diffstat (limited to 'guix/scripts/lint.scm')
-rw-r--r--guix/scripts/lint.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm
index e3b06977ee..83dde9a1a1 100644
--- a/guix/scripts/lint.scm
+++ b/guix/scripts/lint.scm
@@ -81,10 +81,10 @@ Run a set of checkers on the specified package; if none is specified, run the ch
;; provided MESSAGE.
(let ((loc (or (package-field-location package field)
(package-location package))))
- (warning (_ "~a: ~a: ~a~%")
- (location->string loc)
- (package-full-name package)
- message)))
+ (format (guix-warning-port) (_ "~a: ~a: ~a~%")
+ (location->string loc)
+ (package-full-name package)
+ message)))
;;;