procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix hscroll suspension after cursor motion

Browse source 
* src/xdisp.c (hscroll_window_tree): Trigger a thorough redisplay
of the window when temporary suspension of hscrolling is
disabled.  (Bug#29002)
This commit is contained in:
Eli Zaretskii 2017-11-04 11:30:10 +02:00
parent 6f43d29d29
commit d9be8704ae
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/xdisp.c
View file

@ -13174,8 +13174,15 @@ hscroll_window_tree (Lisp_Object window)
/* If the position of this window's point has explicitly /* If the position of this window's point has explicitly
changed, no more suspend auto hscrolling. */ changed, no more suspend auto hscrolling. */
if (NILP (Fequal (Fwindow_point (window), Fwindow_old_point (window)))) if (w->suspend_auto_hscroll
w->suspend_auto_hscroll = false; && NILP (Fequal (Fwindow_point (window),
Fwindow_old_point (window))))
{
w->suspend_auto_hscroll = false;
/* Force thorough redisplay of this window, to show the
effect of disabling hscroll suspension immediately. */
SET_FRAME_GARBAGED (XFRAME (w->frame));
}
/* Remember window point. */ /* Remember window point. */
Fset_marker (w->old_pointm, Fset_marker (w->old_pointm,