>From b21139b7d900d6c3bd38b2790758d2c1b631ada3 Mon Sep 17 00:00:00 2001 From: Daniel Semyonov Date: Fri, 23 Jun 2023 08:40:57 +0300 Subject: [PATCH] Fix VC package build when there is no docs dir * lisp/emacs-lisp/package-vc.el (package-vc--build-documentation): Set 'docs-directory' to 'default-directory' if 'file' isn't a directory. --- lisp/emacs-lisp/package-vc.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index f34cfb3120b..b87bcbc738e 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -386,7 +386,8 @@ package-vc--build-documentation 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 (if (file-name-directory file) + (expand-file-name file) default-directory)) (output (expand-file-name (format "%s.info" pkg-name))) clean-up) (when (string-match-p "\\.org\\'" file) -- 2.41.0