summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2006-02-13 21:36:51 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2006-02-13 21:36:51 +0000
commitc3a1b86139af2a446a09d40b28c123931dea6266 (patch)
treebbe1d02c1e964bea25029ce12a3e423dc7831600 /lisp/calc
parentf8d775e1cd691af73af657f6cf091b7db0227faf (diff)
downloademacs-c3a1b86139af2a446a09d40b28c123931dea6266.tar.gz
(math-check-known-matrixp): Make sure expression is a symbol before
checking that it is bound.
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc-arith.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/calc/calc-arith.el b/lisp/calc/calc-arith.el
index 2372b0ebbfb..a5f25e2464e 100644
--- a/lisp/calc/calc-arith.el
+++ b/lisp/calc/calc-arith.el
@@ -362,6 +362,7 @@
((memq 'matrix (nth 1 decl))
t)
((and (eq (car a) 'var)
+ (symbolp (nth 2 a))
(boundp (nth 2 a))
(setq val (symbol-value (nth 2 a))))
(math-check-known-matrixp val))