aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJay Belanger2005-01-31 09:16:44 +0000
committerJay Belanger2005-01-31 09:16:44 +0000
commit84d77b1eb3a117e81a387fa829fe294e392fac6f (patch)
treea47bc0663a02026dafc852c506b050c26a309fff /lisp
parente09d97e8f11aa63e1d3b0083610882626f6530e3 (diff)
downloademacs-84d77b1eb3a117e81a387fa829fe294e392fac6f.tar.gz
emacs-84d77b1eb3a117e81a387fa829fe294e392fac6f.zip
(math-read-token): Check for smallmatrix environment.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/calc/calc-aent.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el
index 49aae82a950..2b0cf9a004a 100644
--- a/lisp/calc/calc-aent.el
+++ b/lisp/calc/calc-aent.el
@@ -771,6 +771,7 @@ in Calc algebraic input.")
771 math-expr-data "[") 771 math-expr-data "[")
772 (cond ((or (string= envname "matrix") 772 (cond ((or (string= envname "matrix")
773 (string= envname "bmatrix") 773 (string= envname "bmatrix")
774 (string= envname "smallmatrix")
774 (string= envname "pmatrix")) 775 (string= envname "pmatrix"))
775 (if (setq j (string-match (concat "\\\\end{" envname "}") 776 (if (setq j (string-match (concat "\\\\end{" envname "}")
776 math-exp-str math-exp-pos)) 777 math-exp-str math-exp-pos))