diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-09-03 09:01:28 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-09-03 15:43:07 +0200 |
commit | b002e9d08eb909e9fa1a84b0feed1662dce0bd3f (patch) | |
tree | 227cb75678fe38ee923168be4b97abc8c20025f1 /guix/scripts/lint.scm | |
parent | 52bd0810a86396e961ca4c92f7e9e5ea0e8c547b (diff) | |
download | gnu-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.scm | 8 |
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))) ;;; |