diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm
index 6f30d371a2..46989e3a17 100644
--- a/guix/scripts/lint.scm
+++ b/guix/scripts/lint.scm
@@ -668,7 +668,7 @@ descriptions maintained upstream."
 (define (check-source-file-name package)
   "Emit a warning if PACKAGE's origin has no meaningful file name."
   (define (origin-file-name-valid? origin)
-    ;; Return #t if the source file name contains only a version or is #f;
+    ;; Return #f if the source file name contains only a version or is #f;
     ;; indicates that the origin needs a 'file-name' field.
     (let ((file-name (origin-actual-file-name origin))
           (version (package-version package)))