diff --git a/guix/lint.scm b/guix/lint.scm
index fa507546f5..8a4d27ce05 100644
--- a/guix/lint.scm
+++ b/guix/lint.scm
@@ -1208,7 +1208,7 @@ Heritage")
                     '())))
                '()))))
       (match-lambda*
-        ((key url method response)
+        (('swh-error url method response)
          (response->warning url method response))
         ((key . args)
          (if (eq? key skip-key)