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

[Miles Bader]

Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.241.8.7 emacs/lisp/mouse.el:1.241.8.8
*** emacs/lisp/mouse.el:1.241.8.7       Fri Nov 19 06:55:07 2004
--- emacs/lisp/mouse.el Wed Dec  8 05:21:01 2004
***************
*** 2201,2207 ****
     (progn (unless (display-multi-font-p)
            (error "Cannot change fonts on this display"))
          (x-popup-menu
!          last-nonmenu-event
           ;; Append list of fontsets currently defined.
           (append x-fixed-font-alist (list (generate-fontset-menu))))))
    (if fonts
--- 2201,2209 ----
     (progn (unless (display-multi-font-p)
            (error "Cannot change fonts on this display"))
          (x-popup-menu
!          (if (listp last-nonmenu-event)
!              last-nonmenu-event
!            (list '(0 0) (selected-window)))
           ;; Append list of fontsets currently defined.
           (append x-fixed-font-alist (list (generate-fontset-menu))))))
    (if fonts