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 7e08111fddd5a3d2c1d54dc317804142c1d9c355..53555ea9af7d994c357dbfa45029c69d34514a1f 100644 (file)
--- 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'.