From bbcaa3e3b69ae3f3a4d88d35c1a08d24b3627453 Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Mon, 10 Oct 2005 19:41:08 +0000 Subject: [PATCH] (calc-matrix-mode, calc-set-mode-line): Change the mode name `square' to 'sqmatrix'. --- lisp/ChangeLog | 15 +++++++++++++++ lisp/calc/calc.el | 4 ++-- 2 files changed, 17 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 94ba10803c5..71500bade97 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,18 @@ +2005-10-10 Jay Belanger + + * calc/calc-arith.el (math-check-known-scalarp) + (math-check-known-matrixp): Check the values of arguments that are + variables. + (math-check-known-square-matrixp): New function. + (math-known-square-matrixp): Use math-check-known-square-matrixp. + (math-super-types): Add sqmatrix type. + + * calc/calc-mode.el (calc-matrix-mode, math-get-modes-vec): Change the + mode name `square' to 'sqmatrix'. + + * calc/calc.el (calc-matrix-mode, calc-set-mode-line): Change the + mode name `square' to 'sqmatrix'. + 2005-10-10 Stefan Monnier * progmodes/etags.el (select-tags-table-mode): Don't use diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 2220376904f..4c6820ca90e 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el @@ -654,7 +654,7 @@ If nil, computations on numbers always yield numbers where possible.") (defcalcmodevar calc-matrix-mode nil "If `matrix', variables are assumed to be matrix-valued. If a number, variables are assumed to be NxN matrices. -If `square', variables are assumed to be square matrices of an unspecified size. +If `sqmatrix', variables are assumed to be square matrices of an unspecified size. If `scalar', variables are assumed to be scalar-valued. If nil, symbolic math routines make no assumptions about variables.") @@ -1552,7 +1552,7 @@ See calc-keypad for details." (cond ((eq calc-matrix-mode 'matrix) "Matrix ") ((integerp calc-matrix-mode) (format "Matrix%d " calc-matrix-mode)) - ((eq calc-matrix-mode 'square) "SqMatrix ") + ((eq calc-matrix-mode 'sqmatrix) "SqMatrix ") ((eq calc-matrix-mode 'scalar) "Scalar ") (t "")) (if (eq calc-complex-mode 'polar) "Polar " "") -- 2.39.2