/[emacs]/emacs/lisp/lazy-lock.el
ViewVC logotype

Diff of /emacs/lisp/lazy-lock.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.24 by gerd, Thu Aug 16 14:25:15 2001 UTC revision 1.25 by monnier, Mon Nov 19 21:53:17 2001 UTC
# Line 574  verbosity is controlled via the variable Line 574  verbosity is controlled via the variable
574    ;;    ;;
575    ;; Add hook if lazy-lock.el is fontifying on scrolling or is deferring.    ;; Add hook if lazy-lock.el is fontifying on scrolling or is deferring.
576    (when (or fontifying defer-change defer-scroll defer-context)    (when (or fontifying defer-change defer-scroll defer-context)
     (make-local-hook 'window-scroll-functions)  
577      (add-hook 'window-scroll-functions (if defer-scroll      (add-hook 'window-scroll-functions (if defer-scroll
578                                             'lazy-lock-defer-after-scroll                                             'lazy-lock-defer-after-scroll
579                                           'lazy-lock-fontify-after-scroll)                                           'lazy-lock-fontify-after-scroll)
# Line 582  verbosity is controlled via the variable Line 581  verbosity is controlled via the variable
581    ;;    ;;
582    ;; Add hook if lazy-lock.el is fontifying and is not deferring changes.    ;; Add hook if lazy-lock.el is fontifying and is not deferring changes.
583    (when (and fontifying (not defer-change) (not defer-context))    (when (and fontifying (not defer-change) (not defer-context))
     (make-local-hook 'before-change-functions)  
584      (add-hook 'before-change-functions 'lazy-lock-arrange-before-change nil t))      (add-hook 'before-change-functions 'lazy-lock-arrange-before-change nil t))
585    ;;    ;;
586    ;; Replace Font Lock mode hook.    ;; Replace Font Lock mode hook.
# Line 599  verbosity is controlled via the variable Line 597  verbosity is controlled via the variable
597              nil t)              nil t)
598    ;;    ;;
599    ;; Add package-specific hook.    ;; Add package-specific hook.
   (make-local-hook 'outline-view-change-hook)  
600    (add-hook 'outline-view-change-hook 'lazy-lock-fontify-after-visage nil t)    (add-hook 'outline-view-change-hook 'lazy-lock-fontify-after-visage nil t)
   (make-local-hook 'hs-hide-hook)  
601    (add-hook 'hs-hide-hook 'lazy-lock-fontify-after-visage nil t))    (add-hook 'hs-hide-hook 'lazy-lock-fontify-after-visage nil t))
602    
603  (defun lazy-lock-install-timers (dtime stime)  (defun lazy-lock-install-timers (dtime stime)

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26