emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp mouse.el


From: Chong Yidong
Subject: [Emacs-diffs] emacs/lisp mouse.el
Date: Tue, 27 Jan 2009 20:43:27 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/01/27 20:43:27

Modified files:
        lisp           : mouse.el 

Log message:
        (mouse-select-font): Return a string instead of a list.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mouse.el?cvsroot=emacs&r1=1.351&r2=1.352

Patches:
Index: mouse.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mouse.el,v
retrieving revision 1.351
retrieving revision 1.352
diff -u -b -r1.351 -r1.352
--- mouse.el    5 Jan 2009 03:19:36 -0000       1.351
+++ mouse.el    27 Jan 2009 20:43:27 -0000      1.352
@@ -2431,12 +2431,13 @@
   (interactive)
   (unless (display-multi-font-p)
     (error "Cannot change fonts on this display"))
+  (car
   (x-popup-menu
    (if (listp last-nonmenu-event)
        last-nonmenu-event
      (list '(0 0) (selected-window)))
    (append x-fixed-font-alist
-          (list (generate-fontset-menu)))))
+           (list (generate-fontset-menu))))))
 
 (declare-function text-scale-mode "face-remap")
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]