diff options
| author | Richard M. Stallman | 2002-04-26 21:19:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-04-26 21:19:24 +0000 |
| commit | 9e0ad27acdd189ddf1e9c0efda7c6c64856775cc (patch) | |
| tree | b6abdd4e1935b8369b645dd17de6c3de329f6f09 /lisp/textmodes | |
| parent | a8ba442952ea7bde40c9fa79178aae81015dde72 (diff) | |
| download | emacs-9e0ad27acdd189ddf1e9c0efda7c6c64856775cc.tar.gz emacs-9e0ad27acdd189ddf1e9c0efda7c6c64856775cc.zip | |
(tex-start-options): New variable.
(tex-start-commands): New variable.
(tex-start-options-string): Variable deleted.
(tex-start-tex): Use tex-start-options and tex-start-commands,
not tex-start-options-string.
(tex-command): Doc fix.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 31 |
1 files changed, 23 insertions, 8 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 43a26cf2296..81a36ac58d0 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el | |||
| @@ -120,16 +120,29 @@ See the documentation of that variable." | |||
| 120 | :group 'tex-run) | 120 | :group 'tex-run) |
| 121 | 121 | ||
| 122 | ;;;###autoload | 122 | ;;;###autoload |
| 123 | (defcustom tex-start-options-string "\\nonstopmode\\input" | 123 | (defcustom tex-start-options nil |
| 124 | "*TeX options to use when running TeX. | 124 | "*TeX options to use when starting TeX. |
| 125 | These precede the input file name. If nil, TeX runs without option. | 125 | These precede the commands in `tex-start-options' |
| 126 | and the input file name. If nil, TeX runs with no options. | ||
| 126 | See the documentation of `tex-command'." | 127 | See the documentation of `tex-command'." |
| 127 | :type '(radio (const :tag "Interactive \(nil\)" nil) | 128 | :type '(radio (const :tag "Interactive \(nil\)" nil) |
| 128 | (const :tag "Nonstop \(\"\\nonstopmode\\input\"\)" | 129 | (const :tag "Nonstop \(\"\\nonstopmode\\input\"\)" |
| 129 | "\\nonstopmode\\input") | 130 | "\\nonstopmode\\input") |
| 130 | (string :tag "String at your choice")) | 131 | (string :tag "String at your choice")) |
| 131 | :group 'tex-run | 132 | :group 'tex-run |
| 132 | :version "20.4") | 133 | :version "21.4") |
| 134 | |||
| 135 | ;;;###autoload | ||
| 136 | (defcustom tex-start-commands "\\nonstopmode\\input" | ||
| 137 | "*TeX commands to use when starting TeX. | ||
| 138 | These precede the input file name. If nil, no commands are used. | ||
| 139 | See the documentation of `tex-command'." | ||
| 140 | :type '(radio (const :tag "Interactive \(nil\)" nil) | ||
| 141 | (const :tag "Nonstop \(\"\\nonstopmode\\input\"\)" | ||
| 142 | "\\nonstopmode\\input") | ||
| 143 | (string :tag "String at your choice")) | ||
| 144 | :group 'tex-run | ||
| 145 | :version "21.4") | ||
| 133 | 146 | ||
| 134 | (defvar standard-latex-block-names | 147 | (defvar standard-latex-block-names |
| 135 | '("abstract" "array" "center" "description" | 148 | '("abstract" "array" "center" "description" |
| @@ -238,8 +251,9 @@ tex shell terminates.") | |||
| 238 | (defvar tex-command nil | 251 | (defvar tex-command nil |
| 239 | "*Command to run TeX. | 252 | "*Command to run TeX. |
| 240 | If this string contains an asterisk \(`*'\), that is replaced by the file name\; | 253 | If this string contains an asterisk \(`*'\), that is replaced by the file name\; |
| 241 | otherwise the \(shell-quoted\) value of `tex-start-options-string' and | 254 | otherwise the value of `tex-start-options', the \(shell-quoted\) |
| 242 | the file name are added at the end, with blanks as separators. | 255 | value of `tex-start-commands', and the file name are added at the end |
| 256 | with blanks as separators. | ||
| 243 | 257 | ||
| 244 | In TeX, LaTeX, and SliTeX Mode this variable becomes buffer local. | 258 | In TeX, LaTeX, and SliTeX Mode this variable becomes buffer local. |
| 245 | In these modes, use \\[set-variable] if you want to change it for the | 259 | In these modes, use \\[set-variable] if you want to change it for the |
| @@ -1447,9 +1461,10 @@ ALL other buffers." | |||
| 1447 | (comint-quote-filename file) | 1461 | (comint-quote-filename file) |
| 1448 | (substring command (1+ star))) | 1462 | (substring command (1+ star))) |
| 1449 | (concat command " " | 1463 | (concat command " " |
| 1450 | (if (< 0 (length tex-start-options-string)) | 1464 | (if (< 0 (length tex-start-commands)) |
| 1451 | (concat | 1465 | (concat |
| 1452 | (shell-quote-argument tex-start-options-string) " ")) | 1466 | (shell-quote-argument tex-start-commands) " ")) |
| 1467 | tex-start-options | ||
| 1453 | (comint-quote-filename file))))) | 1468 | (comint-quote-filename file))))) |
| 1454 | (tex-send-tex-command compile-command dir))) | 1469 | (tex-send-tex-command compile-command dir))) |
| 1455 | 1470 | ||