From 86e3afd3bda5847cc131caa084115bec7d4063ae Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Mon, 31 Jan 2005 21:52:49 +0000 Subject: [PATCH] (math-read-big-expr): Make LaTeX the default TeX mode. --- lisp/calc/calc-ext.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index 9a79032b8db..374e89ec1f1 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el @@ -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) -- 2.39.5