bug#22404: 25.1.50; Forcing `window-scroll-functions` to run.

[Keith David Bershatsky]

Explicitly calling `set-window-start` doesn't appear to trigger the WSF based 
on the following test -- e.g., moving around the window without scrolling 
doesn't yield any messages.

(setq scroll-conservatively 101)

(defvar pch-test-var nil)

(defun pch-fn ()
  (set-window-start (selected-window) (window-start (selected-window)) 
'noforce))

(add-hook 'post-command-hook 'pch-fn nil 'local)

(defun wsf-fn (win start)
  (message "win: %s | start: %s | end: %s" win start (window-end win t)))

(add-hook 'window-scroll-functions 'wsf-fn nil 'local)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

At Tue, 19 Jan 2016 21:39:53 +0200,
Eli Zaretskii wrote:
> 
> If you call set-window-start with its 3rd argument non-nil, doesn't
> that force window-scroll-functions to be run?