diff options
| author | Ernest N. Mamikonyan | 2020-03-13 10:37:17 -0400 |
|---|---|---|
| committer | Eli Zaretskii | 2020-04-03 15:12:47 +0300 |
| commit | 463f635171683ae3b6907f156305f12fc58ca68e (patch) | |
| tree | 92084f2617e92a6a0aee4e72a20e4247d73c725d | |
| parent | 2c4509179110459f42119ce328d72fea65689288 (diff) | |
| download | emacs-463f635171683ae3b6907f156305f12fc58ca68e.tar.gz emacs-463f635171683ae3b6907f156305f12fc58ca68e.zip | |
Update texinfo.el following changes in 'tex-start-options-string'
* lisp/textmodes/texinfo.el (texinfo-texi2dvi-options): New
defcustom.
(texinfo-tex-buffer): Take 'tex-start-options' from
'texinfo-texi2dvi-options'. (Bug#40001)
* etc/NEWS: Mention the new option.
Copyright-paperwork-exempt: yes
| -rw-r--r-- | etc/NEWS | 6 | ||||
| -rw-r--r-- | lisp/textmodes/texinfo.el | 13 |
2 files changed, 16 insertions, 3 deletions
| @@ -241,6 +241,12 @@ case-insensitive matching of messages when the old behaviour is | |||
| 241 | required, but the recommended solution is to use a correctly matching | 241 | required, but the recommended solution is to use a correctly matching |
| 242 | regexp instead. | 242 | regexp instead. |
| 243 | 243 | ||
| 244 | ** Texinfo | ||
| 245 | |||
| 246 | --- | ||
| 247 | *** New customizable option 'texinfo-texi2dvi-options'. | ||
| 248 | This is used when invoking 'texi2dvi' from 'texinfo-tex-buffer'. | ||
| 249 | |||
| 244 | 250 | ||
| 245 | * New Modes and Packages in Emacs 28.1 | 251 | * New Modes and Packages in Emacs 28.1 |
| 246 | 252 | ||
diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el index 438cb7798a1..66378cb3468 100644 --- a/lisp/textmodes/texinfo.el +++ b/lisp/textmodes/texinfo.el | |||
| @@ -958,6 +958,12 @@ to jump to the corresponding spot in the Texinfo source file." | |||
| 958 | :type 'string | 958 | :type 'string |
| 959 | :group 'texinfo) | 959 | :group 'texinfo) |
| 960 | 960 | ||
| 961 | (defcustom texinfo-texi2dvi-options "" | ||
| 962 | "Command line options for `texinfo-texi2dvi-command'." | ||
| 963 | :type 'string | ||
| 964 | :group 'texinfo | ||
| 965 | :version "28.1") | ||
| 966 | |||
| 961 | (defcustom texinfo-tex-command "tex" | 967 | (defcustom texinfo-tex-command "tex" |
| 962 | "Command used by `texinfo-tex-region' to run TeX on a region." | 968 | "Command used by `texinfo-tex-region' to run TeX on a region." |
| 963 | :type 'string | 969 | :type 'string |
| @@ -1002,9 +1008,10 @@ The value of `texinfo-tex-trailer' is appended to the temporary file after the r | |||
| 1002 | (interactive) | 1008 | (interactive) |
| 1003 | (require 'tex-mode) | 1009 | (require 'tex-mode) |
| 1004 | (let ((tex-command texinfo-texi2dvi-command) | 1010 | (let ((tex-command texinfo-texi2dvi-command) |
| 1005 | ;; Disable tex-start-options-string. texi2dvi would not | 1011 | (tex-start-options texinfo-texi2dvi-options) |
| 1006 | ;; understand anything specified here. | 1012 | ;; Disable tex-start-commands. texi2dvi would not understand |
| 1007 | (tex-start-options-string "")) | 1013 | ;; anything specified here. |
| 1014 | (tex-start-commands "")) | ||
| 1008 | (tex-buffer))) | 1015 | (tex-buffer))) |
| 1009 | 1016 | ||
| 1010 | (defun texinfo-texindex () | 1017 | (defun texinfo-texindex () |