[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

10/10: lint: Use the 'warning' procedure for messages.

From: guix-commits
Subject: 10/10: lint: Use the 'warning' procedure for messages.
Date: Fri, 19 Jul 2019 19:32:31 -0400 (EDT)

civodul pushed a commit to branch master
in repository guix.

commit 3d33c93cef67d88bdc9409959f3c1f3857af09cf
Author: Ludovic Court├Ęs <address@hidden>
Date:   Sat Jul 20 01:31:38 2019 +0200

    lint: Use the 'warning' procedure for messages.
    * guix/scripts/lint.scm (emit-warnings): Use 'warning' instead of
 guix/scripts/lint.scm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm
index 98ee469..ee1c826 100644
--- a/guix/scripts/lint.scm
+++ b/guix/scripts/lint.scm
@@ -46,10 +46,9 @@
    (lambda (lint-warning)
      (let ((package (lint-warning-package lint-warning))
            (loc     (lint-warning-location lint-warning)))
-       (format (guix-warning-port) "~a: ~a@~a: ~a~%"
-               (location->string loc)
-               (package-name package) (package-version package)
-               (lint-warning-message lint-warning))))
+       (warning loc (G_ "~a@~a: ~a~%")
+                (package-name package) (package-version package)
+                (lint-warning-message lint-warning))))
 (define (run-checkers package checkers)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]