From: Daniel Semyonov <daniel@dsemy.com>
Date: Fri, 23 Jun 2023 05:40:57 +0000 (+0300)
Subject: Fix VC package build when doc file isn't in a subdir
X-Git-Tag: emacs-29.1-rc1~107
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4df510c7a70;p=emacs.git

Fix VC package build when doc file isn't in a subdir

* lisp/emacs-lisp/package-vc.el (package-vc--build-documentation):
Expand 'file' before attempting to get its directory.  (Bug#64242)
---

diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index 17e93c430c9..b4c911015b5 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -347,7 +347,7 @@ FILE can be an Org file, indicated by its \".org\" extension,
 otherwise it's assumed to be an Info file."
   (let* ((pkg-name (package-desc-name pkg-desc))
          (default-directory (package-desc-dir pkg-desc))
-         (docs-directory (expand-file-name (file-name-directory file)))
+         (docs-directory (file-name-directory (expand-file-name file)))
          (output (expand-file-name (format "%s.info" pkg-name)))
          clean-up)
     (when (string-match-p "\\.org\\'" file)