diff options
| author | David Kastrup | 2002-08-05 09:34:12 +0000 |
|---|---|---|
| committer | David Kastrup | 2002-08-05 09:34:12 +0000 |
| commit | 2363bd8daa375b4cd50331ab13523dbaebd226dc (patch) | |
| tree | 239c2a7ec656961a301cd0163176a9949ad5c921 | |
| parent | 62458f702e96028e03fd5dadce02fa226e20bb18 (diff) | |
| download | emacs-2363bd8daa375b4cd50331ab13523dbaebd226dc.tar.gz emacs-2363bd8daa375b4cd50331ab13523dbaebd226dc.zip | |
(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.
| -rw-r--r-- | lisp/calc/calc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 1ed448d177f..09614aa1faf 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el | |||
| @@ -2997,8 +2997,9 @@ If mouse is pressed in Calc window, push cut buffer contents onto the stack." | |||
| 2997 | c))) | 2997 | c))) |
| 2998 | (when calc-line-numbering | 2998 | (when calc-line-numbering |
| 2999 | (setq c (math-comp-concat (if (eq calc-language 'big) | 2999 | (setq c (math-comp-concat (if (eq calc-language 'big) |
| 3000 | (when math-comp-selected | 3000 | (if math-comp-selected |
| 3001 | '(tag t "1: ") "1: ") | 3001 | '(tag t "1: ") |
| 3002 | "1: ") | ||
| 3002 | " ") | 3003 | " ") |
| 3003 | c))) | 3004 | c))) |
| 3004 | (unless (or (equal calc-right-label "") | 3005 | (unless (or (equal calc-right-label "") |