Mercurial > emacs
changeset 65305:f91648b9f8b1
(fast-lock) <defgroup>: Move from font-lock.el.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 01 Sep 2005 13:59:17 +0000 |
| parents | 379e08762d65 |
| children | f56e6cd5e1fe |
| files | lisp/obsolete/fast-lock.el |
| diffstat | 1 files changed, 22 insertions(+), 17 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/obsolete/fast-lock.el Wed Aug 31 20:28:48 2005 +0000 +++ b/lisp/obsolete/fast-lock.el Thu Sep 01 13:59:17 2005 +0000 @@ -236,22 +236,27 @@ (defmacro defcustom (symbol value doc &rest args) `(defvar ,symbol ,value ,doc)))) -;(defun fast-lock-submit-bug-report () -; "Submit via mail a bug report on fast-lock.el." -; (interactive) -; (let ((reporter-prompt-for-summary-p t)) -; (reporter-submit-bug-report "simon@gnu.org" "fast-lock 3.14" -; '(fast-lock-cache-directories fast-lock-minimum-size -; fast-lock-save-others fast-lock-save-events fast-lock-save-faces -; fast-lock-verbose) -; nil nil -; (concat "Hi Si., -; -;I want to report a bug. I've read the `Bugs' section of `Info' on Emacs, so I -;know how to make a clear and unambiguous report. To reproduce the bug: -; -;Start a fresh editor via `" invocation-name " -no-init-file -no-site-file'. -;In the `*scratch*' buffer, evaluate:")))) +;;(defun fast-lock-submit-bug-report () +;; "Submit via mail a bug report on fast-lock.el." +;; (interactive) +;; (let ((reporter-prompt-for-summary-p t)) +;; (reporter-submit-bug-report "simon@gnu.org" "fast-lock 3.14" +;; '(fast-lock-cache-directories fast-lock-minimum-size +;; fast-lock-save-others fast-lock-save-events fast-lock-save-faces +;; fast-lock-verbose) +;; nil nil +;; (concat "Hi Si., +;; +;;I want to report a bug. I've read the `Bugs' section of `Info' on Emacs, so I +;;know how to make a clear and unambiguous report. To reproduce the bug: +;; +;;Start a fresh editor via `" invocation-name " -no-init-file -no-site-file'. +;;In the `*scratch*' buffer, evaluate:")))) + +(defgroup fast-lock nil + "Font Lock support mode to cache fontification." + :load 'fast-lock + :group 'font-lock) (defvar fast-lock-mode nil) ; Whether we are turned on. (defvar fast-lock-cache-timestamp nil) ; For saving/reading. @@ -862,5 +867,5 @@ (provide 'fast-lock) -;;; arch-tag: 638c431e-8cae-4538-80a1-963ff97d233e +;; arch-tag: 638c431e-8cae-4538-80a1-963ff97d233e ;;; fast-lock.el ends here