# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1034559053 0
# Node ID 22b1643144e9bada3f08e9635a9acefbde4e0b25
# Parent  c63e966719630f0823ef8b607b97543ee3555e00
(window_scroll): Set immediate_quit.

diff -r c63e96671963 -r 22b1643144e9 src/window.c
--- a/src/window.c	Mon Oct 14 01:30:26 2002 +0000
+++ b/src/window.c	Mon Oct 14 01:30:53 2002 +0000
@@ -4027,12 +4027,16 @@
      int whole;
      int noerror;
 {
+  immediate_quit = 1;
+
   /* If we must, use the pixel-based version which is much slower than
      the line-based one but can handle varying line heights.  */
   if (FRAME_WINDOW_P (XFRAME (XWINDOW (window)->frame)))
     window_scroll_pixel_based (window, n, whole, noerror);
   else
     window_scroll_line_based (window, n, whole, noerror);
+
+  immediate_quit = 0;
 }