(math-read-big-expr): Make LaTeX the default TeX mode.

This commit is contained in:
Jay Belanger 2005-01-31 21:52:49 +00:00
parent 316fc0cc95
commit 86e3afd3bd

View file

@ -2947,13 +2947,13 @@ calc-kill calc-kill-region calc-yank))))
(setq str (concat (substring str 0 (match-beginning 0))
(substring str (match-end 0)))))
(if (string-match "\\\\[^ \n|]" str)
(if (eq calc-language 'tex)
(if (eq calc-language 'latex)
(math-read-expr str)
(let ((calc-language 'tex)
(let ((calc-language 'latex)
(calc-language-option nil)
(math-expr-opers (get 'tex 'math-oper-table))
(math-expr-function-mapping (get 'tex 'math-function-table))
(math-expr-variable-mapping (get 'tex 'math-variable-table)))
(math-expr-opers (get 'latex 'math-oper-table))
(math-expr-function-mapping (get 'latex 'math-function-table))
(math-expr-variable-mapping (get 'latex 'math-variable-table)))
(math-read-expr str)))
(let ((math-read-big-lines nil)
(pos 0)