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

[Miles Bader]

Index: emacs/lisp/window.el
diff -c emacs/lisp/window.el:1.89.6.1 emacs/lisp/window.el:1.89.6.2
*** emacs/lisp/window.el:1.89.6.1       Fri Apr 16 12:50:11 2004
--- emacs/lisp/window.el        Mon Jun 28 07:28:48 2004
***************
*** 36,41 ****
--- 36,44 ----
  However, if a window has become dead, don't get an error,
  just refrain from reselecting it."
    `(let ((save-selected-window-window (selected-window))
+        ;; It is necessary to save all of these, because calling
+        ;; select-window changes frame-selected-window for whatever
+        ;; frame that window is in.
         (save-selected-window-alist
          (mapcar (lambda (frame) (list frame (frame-selected-window frame)))
                  (frame-list))))
***************
*** 327,334 ****
    (with-current-buffer (window-buffer)
      (if view-mode
        (let ((old-info (assq old-w view-return-to-alist)))
!         (push (cons new-w (cons (and old-info (car (cdr old-info))) t))
!               view-return-to-alist)))
      new-w))
  
  (defun split-window-horizontally (&optional arg)
--- 330,338 ----
    (with-current-buffer (window-buffer)
      (if view-mode
        (let ((old-info (assq old-w view-return-to-alist)))
!         (if old-info
!             (push (cons new-w (cons (car (cdr old-info)) t))
!                   view-return-to-alist))))
      new-w))
  
  (defun split-window-horizontally (&optional arg)