Redisplay hook

[Clément Pit--Claudel]

Hi Emacs,

Is there a standard way to run a function after each redisplay cycle? The best 
I could come up with is the following:

(defun my-redisplay-hook (&rest args)
  (message "Redisplayed; %S" args)
  (set-window-redisplay-end-trigger (selected-window) 1))

(setq redisplay-end-trigger-functions '(my-redisplay-hook))
(my-redisplay-hook)

It seems to work OK, but it relies on the obsolete 
set-window-redisplay-end-trigger, and the deprecated variable 
redisplay-end-trigger-functions:

  This variable is obsolete since 23.1;
  use ‘jit-lock-register’ instead.
  This variable may be risky if used as a file-local variable.

But I'm not sure how jit-lock-register-function can help here.

Thanks!
Clément.

signature.asc
Description: OpenPGP digital signature