lint: check-patch-file-names: Use origin-actual-file-name.

[jackhill/guix/guix.git] / guix / lint.scm

diff --git a/guix/lint.scm b/guix/lint.scm
index 627016f..82861b8 100644 (file)
--- a/guix/lint.scm
+++ b/guix/lint.scm
@@ -679,7 +679,7 @@ patch could not be found."
                   ((? string? patch)
                    (starts-with-package-name? (basename patch)))
                   ((? origin? patch)
-                   (starts-with-package-name? (origin-file-name patch)))
+                   (starts-with-package-name? (origin-actual-file-name patch)))
                   (_  #f))     ;must be some other file-like object
                 patches)
          '()