From 5a6566359f91e0eb863e0275b10ce60d45c6e47b Mon Sep 17 00:00:00 2001
From: Chong Yidong <cyd@stupidchicken.com>
Date: Sun, 15 Jun 2008 20:20:42 +0000
Subject: [PATCH] Fix last change.

---
 lisp/mouse.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 7e6a9a13f93..ce003e4ec7f 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -2534,7 +2534,8 @@ choose a font."
 		      (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.
-- 
2.39.2