changeset 46807:f57a8a1712ae

(math-format-stack-value): Revert a broken if->when replacement and reformat so that this does not happen again. Fixes a pretty lethal line formatting/yanking bug.
author David Kastrup <dak@gnu.org>
date Mon, 05 Aug 2002 09:34:12 +0000
parents 84c5e0fe2291
children cf225aed7a75
files lisp/calc/calc.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc.el	Mon Aug 05 09:33:44 2002 +0000
+++ b/lisp/calc/calc.el	Mon Aug 05 09:34:12 2002 +0000
@@ -2997,8 +2997,9 @@
 				  c)))
     (when calc-line-numbering
       (setq c (math-comp-concat (if (eq calc-language 'big)
-				    (when math-comp-selected
-				      '(tag t "1:  ") "1:  ")
+				    (if math-comp-selected
+					'(tag t "1:  ")
+				      "1:  ")
 				  "    ")
 				c)))
     (unless (or (equal calc-right-label "")