From: Richard M. Stallman Date: Sat, 6 May 1995 08:00:08 +0000 (+0000) Subject: (prepare_menu_bars): Clear size-change flag before running X-Git-Tag: emacs-19.34~4139 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=14510fee47e539a6a95ec61ab3c7ef9f7f3b82d8;p=emacs.git (prepare_menu_bars): Clear size-change flag before running size-change functions. (scroll_step, debug_end_pos, line_number_display_limit): Now static. --- diff --git a/src/xdisp.c b/src/xdisp.c index 0d25c7f5155..3e25cdd35db 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -125,7 +125,7 @@ static int highlight_nonselected_windows; /* If cursor motion alone moves point off frame, Try scrolling this many lines up or down if that will bring it back. */ -int scroll_step; +static int scroll_step; /* Nonzero if try_window_id has made blank lines at window bottom since the last redisplay that paused */ @@ -143,7 +143,7 @@ int buffer_shared; static int cursor_vpos; static int cursor_hpos; -int debug_end_pos; +static int debug_end_pos; /* Nonzero means display mode line highlighted */ int mode_line_inverse_video; @@ -212,7 +212,7 @@ int windows_or_buffers_changed; int line_number_displayed; /* Maximum buffer size for which to display line numbers. */ -int line_number_display_limit; +static int line_number_display_limit; /* Number of lines to keep in the message log buffer. t means infinite. nil means don't log at all. */ @@ -675,6 +675,8 @@ prepare_menu_bars () if (FRAME_WINDOW_SIZES_CHANGED (XFRAME (frame))) { Lisp_Object functions; + /* Clear flag first in case we get error below. */ + FRAME_WINDOW_SIZES_CHANGED (XFRAME (frame)) = 0; functions = Vwindow_size_change_functions; GCPRO2 (tail, functions); while (CONSP (functions)) @@ -683,7 +685,6 @@ prepare_menu_bars () functions = XCONS (functions)->cdr; } UNGCPRO; - FRAME_WINDOW_SIZES_CHANGED (XFRAME (frame)) = 0; } GCPRO1 (tail); update_menu_bar (XFRAME (frame)); @@ -1551,7 +1552,8 @@ redisplay_window (window, just_this_one) goto scroll_fail; } - pos = *vmotion (startp, PT < startp ? - scroll_step : scroll_step, + pos = *vmotion (startp, + (PT < startp ? - scroll_step : scroll_step), width, hscroll, window); if (PT >= pos.bufpos)