summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 8a17ad7ce30..e72d0aacd5d 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1441,7 +1441,7 @@ commands given here will actually operate on the *Calculator* stack."
(calc-keypad))))
(when (get-buffer-window "*Calc Keypad*")
(calc-keypad)
- (set-buffer (window-buffer (selected-window))))
+ (set-buffer (window-buffer)))
(if (eq major-mode 'calc-mode)
(calc-quit)
(let ((oldbuf (current-buffer)))