diff --git a/guix/scripts/style.scm b/guix/scripts/style.scm
index 3c100197a7..8957c1d507 100644
--- a/guix/scripts/style.scm
+++ b/guix/scripts/style.scm
@@ -419,7 +419,7 @@ simplify inputs!)."
                                 label-matches?))
                            ('always
                             ;; Assume it's gonna be alright.
-                            (const #f))))
+                            (const #t))))
 
                        (simplify-inputs location
                                         (package-name package)