[nongnu] elpa/scroll-on-drag 0a362232a0 19/35: Run 'run-window-scroll-functions' after scrolling

[ELPA Syncer]

branch: elpa/scroll-on-drag
commit 0a362232a05b79a540ea4a3ad617b082c3b8e0b5
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Run 'run-window-scroll-functions' after scrolling
---
 scroll-on-drag.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/scroll-on-drag.el b/scroll-on-drag.el
index aad52356fd..9dfbcb00bd 100644
--- a/scroll-on-drag.el
+++ b/scroll-on-drag.el
@@ -425,7 +425,8 @@ Returns true when scrolling took place, otherwise nil."
 
     (when has-scrolled-real
       (let ((inhibit-redisplay nil))
-        (run-hooks 'scroll-on-drag-post-hook)))
+        (run-hooks 'scroll-on-drag-post-hook)
+        (run-window-scroll-functions this-window)))
 
     ;; Result so we know if any scrolling occurred,
     ;; allowing a fallback action on 'click'.