diff options
author | Philip Kaludercic <philipk@posteo.net> | 2022-08-11 12:40:17 +0200 |
---|---|---|
committer | Philip Kaludercic <philipk@posteo.net> | 2022-08-11 12:40:17 +0200 |
commit | 878cacc7127426a51feff28dd323674a7e62a5e0 (patch) | |
tree | caa6f3d81b213b9392601f0711aa349be1cc4753 /lisp/emacs-lisp | |
parent | 8638aace3fbe01529f33870f469fa60bf5e43ee7 (diff) | |
download | emacs-878cacc7127426a51feff28dd323674a7e62a5e0.tar.gz emacs-878cacc7127426a51feff28dd323674a7e62a5e0.tar.bz2 emacs-878cacc7127426a51feff28dd323674a7e62a5e0.zip |
* package-vc.el (package-vc-unpack): Detect TeXinfo manuals
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package-vc.el | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 0776d2c0a8e..5a707e1a600 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -195,7 +195,17 @@ The output is written out into PKG-FILE." (package--native-compile-async new-desc)) ;; After compilation, load again any files loaded by ;; `activate-1', so that we use the byte-compiled definitions. - (package--reload-previously-loaded new-desc))))) + (package--reload-previously-loaded new-desc))) + + ;; Detect a manual + (when (executable-find "install-info") + ;; Only proceed if we can find an unambiguous TeXinfo file + (let ((texi-files (directory-files pkg-dir t "\\.texi\\'")) + (dir-file (expand-file-name "dir" pkg-dir))) + (when (length= texi-files 1) + (call-process "install-info" nil nil nil + (concat "--dir=" dir-file) + (car texi-files))))))) (defun package-vc-sourced-packages-list () "Generate a list of packages with VC data." |