summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-08-23 22:11:31 +0200
committerLudovic Courtès <ludo@gnu.org>2020-08-23 23:05:16 +0200
commit68193624d1428836b18e93306f96e78706e082c3 (patch)
tree067eae0a6418fd71af8156d539e07ab917884fed
parenta8c8f6fe916d67cfc254527a987011146d8243df (diff)
downloadguix-68193624d1428836b18e93306f96e78706e082c3.tar.gz
lint: Avoid calls to 'package-field-location' with #f as the field.
* guix/lint.scm (%make-warning): Call 'package-field-location' only when
FIELD is true.
-rw-r--r--guix/lint.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/lint.scm b/guix/lint.scm
index 71ce931964..4a6abe4275 100644
--- a/guix/lint.scm
+++ b/guix/lint.scm
@@ -139,7 +139,7 @@
    message-text
    message-data
    (or location
-       (package-field-location package field)
+       (and field (package-field-location package field))
        (package-location package))))
 
 (define-syntax make-warning