(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 339dfd838a4e254866357dd4476062baee8d2a0d..c15724ccde78d0d4faddea03806db4473cd46075 100644 (file)
--- 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))