From: Geoff Voelker <voelker@cs.washington.edu>
Date: Thu, 14 May 1998 05:16:54 +0000 (+0000)
Subject: (w32_ring_bell): Flash window correctly.
X-Git-Tag: emacs-20.3~1018
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8331e67615c47060ccbe7847f4df0e614f58dd1f;p=emacs.git

(w32_ring_bell): Flash window correctly.
---

diff --git a/src/w32term.c b/src/w32term.c
index 7a329964fe7..b55c6c5d83d 100644
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -836,7 +836,17 @@ w32_ring_bell (void)
   BLOCK_INPUT;
 
   if (visible_bell)
-      FlashWindow (FRAME_W32_WINDOW (selected_frame), TRUE);
+    {
+      int i;
+      HWND hwnd = FRAME_W32_WINDOW (selected_frame);
+
+      for (i = 0; i < 5; i++) 
+	{
+	  FlashWindow (hwnd, TRUE);
+	  Sleep (10);
+	}
+      FlashWindow (hwnd, FALSE);
+    }
   else
       w32_sys_ring_bell ();