From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Wed, 27 Apr 2005 04:35:16 +0000 (+0000)
Subject: (calc-edit-finish): Make sure there is more than one window before
X-Git-Tag: ttn-vms-21-2-B4~705
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1ed7becaf6350155f62540381e529241fc09728;p=emacs.git

(calc-edit-finish): Make sure there is more than one window before
deleting window.
---

diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el
index 339dfd838a4..c15724ccde7 100644
--- a/lisp/calc/calc-yank.el
+++ b/lisp/calc/calc-yank.el
@@ -528,7 +528,7 @@ To cancel the edit, simply kill the *Calc Edit* buffer."
     (goto-char calc-edit-top)
     (if (buffer-modified-p)
 	(eval calc-edit-handler))
-    (if one-window
+    (if (and one-window (not (one-window-p t)))
 	(delete-window))
     (if (get-buffer-window return)
 	(select-window (get-buffer-window return))