Mercurial > emacs

changeset 65993:7e915ad64a71

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(math-check-known-square-matrixp): Change order in which value is checked.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 10 Oct 2005 19:59:18 +0000
parents 79a78f2e95f6
children 2acb65805f2f
files lisp/calc/calc-arith.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-arith.el	Mon Oct 10 19:56:42 2005 +0000
+++ b/lisp/calc/calc-arith.el	Mon Oct 10 19:59:18 2005 +0000
@@ -383,8 +383,6 @@
            (cond
             ((memq 'sqmatrix (nth 1 decl))
              t)
-            ((memq 'matrix (nth 1 decl))
-             nil)
             ((and (eq (car a) 'var)
                   (boundp (nth 2 a))
                   (setq val (symbol-value (nth 2 a))))
@@ -394,6 +392,8 @@
                    (eq calc-matrix-mode 'sqmatrix))
                   (eq (car-safe a) 'var))
              t)
+            ((memq 'matrix (nth 1 decl))
+             nil)
             (t
              nil))))))