# HG changeset patch
# User Geoff Voelker <voelker@cs.washington.edu>
# Date 893956853 0
# Node ID 16414f4d07e7e52986854f9b3b92d7bdad0fd4fc
# Parent  c0871d40073e16d98a454d22352d9b10c06b23ef
(msh_mousewheel): Declare.
(w32_read_socket): Check for mousewheel events.

diff -r c0871d40073e -r 16414f4d07e7 src/w32term.c
--- a/src/w32term.c	Thu Apr 30 17:19:55 1998 +0000
+++ b/src/w32term.c	Thu Apr 30 17:20:53 1998 +0000
@@ -55,6 +55,8 @@
 #define min(x, y) (((x) < (y)) ? (x) : (y))
 #define max(x, y) (((x) > (y)) ? (x) : (y))
 
+extern unsigned int msh_mousewheel;
+
 extern void free_frame_menubar ();
 
 extern Lisp_Object Vwindow_system;
@@ -3205,6 +3207,31 @@
 	  
 	  check_visibility = 1;
 	  break;
+
+	default:
+	  /* Check for messages registered at runtime. */
+	  if (msg.msg.message == msh_mousewheel)
+	    {
+	      if (dpyinfo->grabbed && last_mouse_frame 
+		  && FRAME_LIVE_P (last_mouse_frame))
+		f = last_mouse_frame;
+	      else
+		f = x_window_to_frame (dpyinfo, msg.msg.hwnd);
+          
+	      if (f)
+		{
+		  if ((!dpyinfo->w32_focus_frame 
+		       || f == dpyinfo->w32_focus_frame)
+		      && (numchars >= 1))
+		    {
+		      construct_mouse_wheel (bufp, &msg, f);
+		      bufp++;
+		      count++;
+		      numchars--;
+		    }
+		}
+	    }
+	  break;
 	}
     }