[Emacs-diffs] Changes to emacs/lisp/menu-bar.el

[Richard M . Stallman]

Index: emacs/lisp/menu-bar.el
diff -c emacs/lisp/menu-bar.el:1.251 emacs/lisp/menu-bar.el:1.252
*** emacs/lisp/menu-bar.el:1.251        Sun Nov 28 00:56:43 2004
--- emacs/lisp/menu-bar.el      Wed Feb 16 09:47:37 2005
***************
*** 1515,1523 ****
      (dolist (f (frame-list))
        (when (equal last-command-event (frame-parameter f 'name))
        (setq frame f)))
!   (make-frame-visible frame)
!   (raise-frame frame)
!   (select-frame frame)))
  
  (defun menu-bar-update-buffers-1 (elt)
    (let* ((buf (car elt))
--- 1515,1525 ----
      (dolist (f (frame-list))
        (when (equal last-command-event (frame-parameter f 'name))
        (setq frame f)))
!     ;; FRAME can be nil when user specifies the selected frame.
!     (setq frame (or frame (selected-frame)))
!     (make-frame-visible frame)
!     (raise-frame frame)
!     (select-frame frame)))
  
  (defun menu-bar-update-buffers-1 (elt)
    (let* ((buf (car elt))