package-build--generate-info-files: Fix dir generation

This no longer worked for an info file in a subdirectory.
melpa · Sep 16, 2024 · 379e38b · 379e38b
1 parent ac03f07
commit 379e38b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/package-build.el b/package-build.el
@@ -1063,7 +1063,8 @@ is the same as the value of `export_file_name'."
                       (or (member src orgs) (assoc src orgs))
                       src))
            (texi (and (member ext '("texi" "texinfo")) src))
-           (info (and (equal ext "info") src)))
+           (info (and (equal ext "info")
+                      (file-name-nondirectory src))))
       (when org
         (let ((default-directory (file-name-directory (expand-file-name org)))
               (next (or (cadr (assoc src orgs))