# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1213561242 0
# Node ID ab77bad0093c5c5c6ba0b24df08025d570472eb2
# Parent  d14b514545683ac680ddeded46dabdd6fb065670
Fix last change.

diff -r d14b51454568 -r ab77bad0093c lisp/mouse.el
--- a/lisp/mouse.el	Sun Jun 15 20:11:11 2008 +0000
+++ b/lisp/mouse.el	Sun Jun 15 20:20:42 2008 +0000
@@ -2534,7 +2534,8 @@
 		      (font-face-attributes 
 		       (if (eq choice 'x-select-font)
 			   (x-select-font)
-			 (symbol-name choice))))))))))
+			 (symbol-name choice))))
+	       (force-window-update (current-buffer))))))))
 
 
 ;;; Bindings for mouse commands.