# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 1214283171 0
# Node ID 15fc1f3d8664238bdbb15549137494174243a694
# Parent  e5a55b8c98924597c41230df28b8b5c434baa8b4
Handle void selection in mouse-appearance-menu

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1281

diff -r e5a55b8c9892 -r 15fc1f3d8664 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Jun 24 04:04:48 2008 +0000
+++ b/lisp/ChangeLog	Tue Jun 24 04:52:51 2008 +0000
@@ -1,3 +1,8 @@
+2008-06-24  Miles Bader  <miles@gnu.org>
+
+	* mouse.el (mouse-appearance-menu): Don't do anything if the user
+	pops up the menu but doesn't select anything.
+
 2008-06-24  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* add-log.el (add-change-log-entry): Add new arg to force each new
diff -r e5a55b8c9892 -r 15fc1f3d8664 lisp/mouse.el
--- a/lisp/mouse.el	Tue Jun 24 04:04:48 2008 +0000
+++ b/lisp/mouse.el	Tue Jun 24 04:52:51 2008 +0000
@@ -2524,7 +2524,7 @@
 	      ((eq choice 'face-remap-reset-base)
 	       (text-scale-mode 0)
 	       (buffer-face-mode 0))
-	      (t
+	      (choice
 	       ;; Either choice == 'x-select-font, or choice is a
 	       ;; symbol whose name is a font.
 	       (buffer-face-mode-invoke (font-face-attributes