aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2025-09-05 15:02:54 -0400
committerStefan Monnier2025-09-05 15:02:54 -0400
commitc374bb50daa0c2d603a55d9b05bef9c9534ad0a7 (patch)
tree4a17872b741fffd68f66c0342e98e4a93540c74d /src
parent4d8ba9fbe7528906bfa1425962ad61f6e591d5e9 (diff)
downloademacs-c374bb50daa0c2d603a55d9b05bef9c9534ad0a7.tar.gz
emacs-c374bb50daa0c2d603a55d9b05bef9c9534ad0a7.zip
(redisplay_internal): Fix `follow-mode` (bug#79306)
* src/xdisp.c (redisplay_internal): Don't increment `redisplay_counter` if we ail out before starting an actual redisplay.
Diffstat (limited to 'src')
-rw-r--r--src/xdisp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/xdisp.c b/src/xdisp.c
index 89561d750b6..aef40c38e54 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -17137,8 +17137,6 @@ redisplay_internal (void)
17137 bool polling_stopped_here = false; 17137 bool polling_stopped_here = false;
17138 Lisp_Object tail, frame; 17138 Lisp_Object tail, frame;
17139 17139
17140 redisplay_counter++;
17141
17142 /* Set a limit to the number of retries we perform due to horizontal 17140 /* Set a limit to the number of retries we perform due to horizontal
17143 scrolling, this avoids getting stuck in an uninterruptible 17141 scrolling, this avoids getting stuck in an uninterruptible
17144 infinite loop (Bug #24633). */ 17142 infinite loop (Bug #24633). */
@@ -17197,6 +17195,8 @@ redisplay_internal (void)
17197 return; 17195 return;
17198#endif 17196#endif
17199 17197
17198 redisplay_counter++;
17199
17200 /* Record a function that clears redisplaying_p 17200 /* Record a function that clears redisplaying_p
17201 when we leave this function. */ 17201 when we leave this function. */
17202 specpdl_ref count = SPECPDL_INDEX (); 17202 specpdl_ref count = SPECPDL_INDEX ();