diff lisp/calc/calc-ext.el @ 59828:2f3d955df59a

(math-read-big-expr): Make LaTeX the default TeX mode.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 31 Jan 2005 21:52:49 +0000
parents 3192518bb184
children 3482f7594027 fa9654493afb
line wrap: on
line diff
--- a/lisp/calc/calc-ext.el	Mon Jan 31 21:52:11 2005 +0000
+++ b/lisp/calc/calc-ext.el	Mon Jan 31 21:52:49 2005 +0000
@@ -2947,13 +2947,13 @@
        (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)