# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1079045012 0
# Node ID f84db574fec7c89a3f10db9c6e88dd7c2ce0331f
# Parent  15b0be6b509fd375f65ad087eea1a89ec4076138
(XTread_socket): Fix mouse click on tool bar.

diff -r 15b0be6b509f -r f84db574fec7 src/macterm.c
--- a/src/macterm.c	Thu Mar 11 22:43:24 2004 +0000
+++ b/src/macterm.c	Thu Mar 11 22:43:32 2004 +0000
@@ -8262,7 +8262,6 @@
 	            {
 		      Lisp_Object window;
 
-	              inev.kind = MOUSE_CLICK_EVENT;
 		      XSETFRAME (inev.frame_or_window, mwp->mFP);
 		      if (er.what == mouseDown)
 			mouse_tracking_in_progress
@@ -8285,6 +8284,8 @@
 						   );
 			  break;
 			}
+		      else
+			inev.kind = MOUSE_CLICK_EVENT;
 		    }
 
 #if USE_CARBON_EVENTS