Mercurial > emacs
diff lisp/calc/calc-mode.el @ 65988:43c517a3ef4e
(calc-matrix-mode, math-get-modes-vec): Change the mode name `square'
to 'sqmatrix'.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Mon, 10 Oct 2005 19:38:02 +0000 |
| parents | f4c158053fb0 |
| children | 6bf177f8065b 5e2d3828e89f |
line wrap: on
line diff
--- a/lisp/calc/calc-mode.el Mon Oct 10 19:37:33 2005 +0000 +++ b/lisp/calc/calc-mode.el Mon Oct 10 19:38:02 2005 +0000 @@ -352,7 +352,7 @@ (if (eq calc-complex-mode 'polar) 1 0) (cond ((eq calc-matrix-mode 'scalar) 0) ((eq calc-matrix-mode 'matrix) -2) - ((eq calc-matrix-mode 'square) -3) + ((eq calc-matrix-mode 'sqmatrix) -3) (calc-matrix-mode) (t -1)) (cond ((eq calc-simplify-mode 'none) -1) @@ -478,7 +478,7 @@ ((< (prefix-numeric-value arg) 1) (and (< (prefix-numeric-value arg) -1) 'matrix)) (arg - (if (consp arg) 'square + (if (consp arg) 'sqmatrix (prefix-numeric-value arg))) ((eq calc-matrix-mode 'matrix) 'scalar) ((eq calc-matrix-mode 'scalar) nil) @@ -488,7 +488,7 @@ calc-matrix-mode calc-matrix-mode) (message (if (eq calc-matrix-mode 'matrix) "Variables are assumed to be matrices" - (if (eq calc-matrix-mode 'square) + (if (eq calc-matrix-mode 'sqmatrix) "Variables are assumed to be square matrices" (if calc-matrix-mode "Variables are assumed to be scalars (non-matrices)"