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

(calc-kbd-report, calc-kbd-query): Don't bind `executing-kbd-macro'

Browse Source 
and `defining-kbd-macro'.
This commit is contained in:
Colin Walters 2002-09-30 04:25:38 +00:00
parent b27614ceff
commit 20e97ae684
1 changed files with 2 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lisp/calc/calc-prog.el
View File

@ -1344,22 +1344,12 @@
(defun calc-kbd-report (msg)
(interactive "sMessage: ")
(calc-wrapper
(let ((executing-kbd-macro nil)
(defining-kbd-macro nil))
(math-working msg (calc-top-n 1)))))
(math-working msg (calc-top-n 1))))
(defun calc-kbd-query (msg)
(interactive "sPrompt: ")
(calc-wrapper
(let ((executing-kbd-macro nil)
(defining-kbd-macro nil))
(calc-alg-entry nil (and (not (equal msg "")) msg)))))
(calc-alg-entry nil (and (not (equal msg "")) msg))))
;;;; Logical operations.