Commit 2bd255dd authored by Jay Belanger's avatar Jay Belanger
Browse files

calc-misc.el (calc-record-why): Don't record a message twice.

parent 6125983e
2012-08-08 Jay Belanger <>
* calc/calc-misc.el (calc-record-why): Don't record a message twice.
2012-08-07 Andreas Schwab <>
* emacs-lisp/lisp-mode.el (eval-defun-1): Handle standard value of
......@@ -305,7 +305,8 @@ Calc user interface as before (either C-x * C or C-x * K; initially C-x * C).
(string-match "\\`\\*" (car stuff)))
(setq stuff (cons '* (cons (substring (car stuff) 1)
(cdr stuff)))))))
(setq calc-next-why (cons stuff calc-next-why))
(unless (member stuff calc-next-why)
(setq calc-next-why (cons stuff calc-next-why)))
;; True if A is a constant or vector of constants. [P x] [Public]
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment