/[emacs]/emacs/lisp/obsolete/fast-lock.el
ViewVC logotype

Diff of /emacs/lisp/obsolete/fast-lock.el

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

revision 1.5 by monnier, Thu Sep 1 13:59:17 2005 UTC revision 1.6 by monnier, Fri Sep 2 18:39:42 2005 UTC
# Line 379  For saving, see variables `fast-lock-min Line 379  For saving, see variables `fast-lock-min
379              (if arg (> (prefix-numeric-value arg) 0) (not fast-lock-mode))))              (if arg (> (prefix-numeric-value arg) 0) (not fast-lock-mode))))
380    (if (and fast-lock-mode (not font-lock-mode))    (if (and fast-lock-mode (not font-lock-mode))
381        ;; Turned on `fast-lock-mode' rather than `font-lock-mode'.        ;; Turned on `fast-lock-mode' rather than `font-lock-mode'.
382        (let ((font-lock-support-mode 'fast-lock-mode))        (progn
383          (font-lock-mode t))          (message "Use font-lock-support-mode rather than calling fast-lock-mode")
384            (sit-for 2))
385      ;; Let's get down to business.      ;; Let's get down to business.
386      (set (make-local-variable 'fast-lock-cache-timestamp) nil)      (set (make-local-variable 'fast-lock-cache-timestamp) nil)
387      (set (make-local-variable 'fast-lock-cache-filename) nil)      (set (make-local-variable 'fast-lock-cache-filename) nil)

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

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