changeset 99391:d33ec2dc14a6

(calc-quit): Make sure that the keypad buffer exists before delete its windows.
author Jay Belanger <jay.p.belanger@gmail.com>
date Tue, 04 Nov 2008 23:51:04 +0000
parents 0c8f4221f839
children d508b4d9cf4e
files lisp/calc/calc.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc.el	Tue Nov 04 18:42:04 2008 +0000
+++ b/lisp/calc/calc.el	Tue Nov 04 23:51:04 2008 +0000
@@ -1431,7 +1431,7 @@
             (setq calc-window-height (- (window-height win) 2)))
         (progn
           (delete-windows-on buf)
-          (delete-windows-on kbuf))
+          (and kbuf (delete-windows-on kbuf)))
         (bury-buffer buf)
         (bury-buffer calc-trail-buffer)
         (and kbuf (bury-buffer kbuf))))))