procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Jay Belanger 2012-08-07 20:30:58 -05:00
parent 6125983ea6
commit 2bd255dd8f
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2012-08-08 Jay Belanger <jay.p.belanger@gmail.com>
* calc/calc-misc.el (calc-record-why): Don't record a message twice.
2012-08-07 Andreas Schwab <schwab@linux-m68k.org>
* emacs-lisp/lisp-mode.el (eval-defun-1): Handle standard value of

3
lisp/calc/calc-misc.el
View file

@ -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)))
nil)
;; True if A is a constant or vector of constants. [P x] [Public]