Index: emacs/lisp/calc/calc-yank.el
diff -c emacs/lisp/calc/calc-yank.el:1.16 emacs/lisp/calc/calc-yank.el:1.17
*** emacs/lisp/calc/calc-yank.el:1.16   Tue Jan 18 04:52:55 2005
--- emacs/lisp/calc/calc-yank.el        Wed Apr 27 04:35:16 2005
***************
*** 528,534 ****
      (goto-char calc-edit-top)
      (if (buffer-modified-p)
        (eval calc-edit-handler))
!     (if one-window
        (delete-window))
      (if (get-buffer-window return)
        (select-window (get-buffer-window return))
--- 528,534 ----
      (goto-char calc-edit-top)
      (if (buffer-modified-p)
        (eval calc-edit-handler))
!     (if (and one-window (not (one-window-p t)))
        (delete-window))
      (if (get-buffer-window return)
        (select-window (get-buffer-window return))


_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to