mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-06 20:49:33 +00:00
Code Issues Releases Activity

calc-embed.el

Browse Source 
(calc-do-embedded): Put data on stack before changing modes.
This commit is contained in:
Jay Belanger 2005-03-21 15:49:02 +00:00
parent 568ec09d60
commit 51d6d30054
2 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2005-03-21 Jay Belanger <belanger@truman.edu>
* calc/calc-embed.el (calc-do-embedded): Put data on stack before
changing modes.
2005-03-21 Sam Steingold <sds@gnu.org>
* add-log.el (add-log-current-defun): Support more C DEFUN forms.

9
lisp/calc/calc-embed.el
View File

@ -227,10 +227,13 @@ This is not required to be present for user-written mode annotations.")
(calc-wrapper
(let* ((okay nil)
(calc-no-refresh-evaltos t))
(setq chg (calc-embedded-set-modes
(aref info 15) (aref info 12) (aref info 13)))
(if (aref info 8)
(calc-push (calc-normalize (aref info 8)))
(progn
(calc-push (calc-normalize (aref info 8)))
(setq chg (calc-embedded-set-modes
(aref info 15) (aref info 12) (aref info 13))))
(setq chg (calc-embedded-set-modes
(aref info 15) (aref info 12) (aref info 13)))
(calc-alg-entry)))
(setq calc-undo-list nil
calc-redo-list nil