;;
;; Add hook if lazy-lock.el is fontifying on scrolling or is deferring.
(when (or fontifying defer-change defer-scroll defer-context)
- (make-local-hook 'window-scroll-functions)
(add-hook 'window-scroll-functions (if defer-scroll
'lazy-lock-defer-after-scroll
'lazy-lock-fontify-after-scroll)
;;
;; Add hook if lazy-lock.el is fontifying and is not deferring changes.
(when (and fontifying (not defer-change) (not defer-context))
- (make-local-hook 'before-change-functions)
(add-hook 'before-change-functions 'lazy-lock-arrange-before-change nil t))
;;
;; Replace Font Lock mode hook.
nil t)
;;
;; Add package-specific hook.
- (make-local-hook 'outline-view-change-hook)
(add-hook 'outline-view-change-hook 'lazy-lock-fontify-after-visage nil t)
- (make-local-hook 'hs-hide-hook)
(add-hook 'hs-hide-hook 'lazy-lock-fontify-after-visage nil t))
(defun lazy-lock-install-timers (dtime stime)