From: Stefan Kangas <stefankangas@gmail.com>
Date: Thu, 26 Dec 2024 20:06:29 +0000 (+0100)
Subject: makeinfo-run-command: Use texi2any when makeinfo doesn't exist
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d8b758e573e7fa6dec019966f034cb66d7ba5ef5;p=emacs.git

makeinfo-run-command: Use texi2any when makeinfo doesn't exist

* lisp/textmodes/makeinfo.el (makeinfo-run-command): Use texi2any when
makeinfo does't exist.  (Bug#75123)

(cherry picked from commit 76170ea5a0dff45d3feedf523c4c6809f1a56a59)
---

diff --git a/lisp/textmodes/makeinfo.el b/lisp/textmodes/makeinfo.el
index 7e08111fddd..53555ea9af7 100644
--- a/lisp/textmodes/makeinfo.el
+++ b/lisp/textmodes/makeinfo.el
@@ -56,10 +56,14 @@
   :group 'docs)
 
 
-(defcustom makeinfo-run-command "makeinfo"
+(defcustom makeinfo-run-command
+  (cond ((executable-find "makeinfo") "makeinfo")
+        ((executable-find "texi2any") "texi2any")
+        (t "makeinfo"))
   "Command used to run `makeinfo' subjob.
 The name of the file is appended to this string, separated by a space."
-  :type 'string)
+  :type 'string
+  :version "31.1")
 
 (defcustom makeinfo-options "--fill-column=70"
   "String containing options for running `makeinfo'.