[Emacs-diffs] Changes to emacs/lisp/subr.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/subr.el
diff -c emacs/lisp/subr.el:1.360.2.2 emacs/lisp/subr.el:1.360.2.3
*** emacs/lisp/subr.el:1.360.2.2        Mon Jun 28 07:28:46 2004
--- emacs/lisp/subr.el  Sat Jul 17 02:46:46 2004
***************
*** 1600,1606 ****
  
  ;; This should probably be written in C (i.e., without using `walk-windows').
  (defun get-buffer-window-list (buffer &optional minibuf frame)
!   "Return windows currently displaying BUFFER, or nil if none.
  See `walk-windows' for the meaning of MINIBUF and FRAME."
    (let ((buffer (if (bufferp buffer) buffer (get-buffer buffer))) windows)
      (walk-windows (function (lambda (window)
--- 1600,1607 ----
  
  ;; This should probably be written in C (i.e., without using `walk-windows').
  (defun get-buffer-window-list (buffer &optional minibuf frame)
!   "Return list of all windows displaying BUFFER, or nil if none.
! BUFFER can be a buffer or a buffer name.
  See `walk-windows' for the meaning of MINIBUF and FRAME."
    (let ((buffer (if (bufferp buffer) buffer (get-buffer buffer))) windows)
      (walk-windows (function (lambda (window)
***************
*** 1798,1803 ****
--- 1799,1810 ----
    "Execute the forms in BODY with WINDOW as the selected window.
  The value returned is the value of the last form in BODY.
  This does not alter the buffer list ordering.
+ This function saves and restores the selected window, as well as
+ the selected window in each frame.  If the previously selected
+ window of some frame is no longer live at the end of BODY, that
+ frame's selected window is left alone.  If the selected window is
+ no longer live, then whatever window is selected at the end of
+ BODY remains selected.
  See also `with-temp-buffer'."
    (declare (indent 1) (debug t))
    ;; Most of this code is a copy of save-selected-window.