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))