diff options
| author | Simon Marshall | 1997-06-19 08:39:55 +0000 |
|---|---|---|
| committer | Simon Marshall | 1997-06-19 08:39:55 +0000 |
| commit | 0ceb91c18bec6c085e6934b0e06bade4fa46ab0c (patch) | |
| tree | 1821583a94056e0f1bf25e99eb363a0435298dba | |
| parent | 173f234148593fc453638d8490b90390d4945e65 (diff) | |
| download | emacs-0ceb91c18bec6c085e6934b0e06bade4fa46ab0c.tar.gz emacs-0ceb91c18bec6c085e6934b0e06bade4fa46ab0c.zip | |
Rearrange custom options.
| -rw-r--r-- | lisp/fast-lock.el | 48 |
1 files changed, 24 insertions, 24 deletions
diff --git a/lisp/fast-lock.el b/lisp/fast-lock.el index f446e212c70..967468cfde8 100644 --- a/lisp/fast-lock.el +++ b/lisp/fast-lock.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | 4 | ||
| 5 | ;; Author: Simon Marshall <simon@gnu.ai.mit.edu> | 5 | ;; Author: Simon Marshall <simon@gnu.ai.mit.edu> |
| 6 | ;; Keywords: faces files | 6 | ;; Keywords: faces files |
| 7 | ;; Version: 3.12.02 | 7 | ;; Version: 3.12.03 |
| 8 | 8 | ||
| 9 | ;;; This file is part of GNU Emacs. | 9 | ;;; This file is part of GNU Emacs. |
| 10 | 10 | ||
| @@ -219,7 +219,7 @@ | |||
| 219 | ; "Submit via mail a bug report on fast-lock.el." | 219 | ; "Submit via mail a bug report on fast-lock.el." |
| 220 | ; (interactive) | 220 | ; (interactive) |
| 221 | ; (let ((reporter-prompt-for-summary-p t)) | 221 | ; (let ((reporter-prompt-for-summary-p t)) |
| 222 | ; (reporter-submit-bug-report "simon@gnu.ai.mit.edu" "fast-lock 3.12.02" | 222 | ; (reporter-submit-bug-report "simon@gnu.ai.mit.edu" "fast-lock 3.12.03" |
| 223 | ; '(fast-lock-cache-directories fast-lock-minimum-size | 223 | ; '(fast-lock-cache-directories fast-lock-minimum-size |
| 224 | ; fast-lock-save-others fast-lock-save-events fast-lock-save-faces | 224 | ; fast-lock-save-others fast-lock-save-events fast-lock-save-faces |
| 225 | ; fast-lock-verbose) | 225 | ; fast-lock-verbose) |
| @@ -238,6 +238,28 @@ | |||
| 238 | 238 | ||
| 239 | ;; User Variables: | 239 | ;; User Variables: |
| 240 | 240 | ||
| 241 | (defcustom fast-lock-minimum-size (* 25 1024) | ||
| 242 | "*Minimum size of a buffer for cached fontification. | ||
| 243 | Only buffers more than this can have associated Font Lock cache files saved. | ||
| 244 | If nil, means cache files are never created. | ||
| 245 | If a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE), | ||
| 246 | where MAJOR-MODE is a symbol or t (meaning the default). For example: | ||
| 247 | ((c-mode . 25600) (c++-mode . 25600) (rmail-mode . 1048576)) | ||
| 248 | means that the minimum size is 25K for buffers in C or C++ modes, one megabyte | ||
| 249 | for buffers in Rmail mode, and size is irrelevant otherwise." | ||
| 250 | :type '(choice (const :tag "none" nil) | ||
| 251 | (integer :tag "size") | ||
| 252 | (repeat :menu-tag "mode specific" :tag "mode specific" | ||
| 253 | :value ((t . nil)) | ||
| 254 | (cons :tag "Instance" | ||
| 255 | (radio :tag "Mode" | ||
| 256 | (const :tag "all" t) | ||
| 257 | (symbol :tag "name")) | ||
| 258 | (radio :tag "Size" | ||
| 259 | (const :tag "none" nil) | ||
| 260 | (integer :tag "size"))))) | ||
| 261 | :group 'fast-lock) | ||
| 262 | |||
| 241 | (defcustom fast-lock-cache-directories '("." "~/.emacs-flc") | 263 | (defcustom fast-lock-cache-directories '("." "~/.emacs-flc") |
| 242 | ; - `internal', keep each file's Font Lock cache file in the same file. | 264 | ; - `internal', keep each file's Font Lock cache file in the same file. |
| 243 | ; - `external', keep each file's Font Lock cache file in the same directory. | 265 | ; - `external', keep each file's Font Lock cache file in the same directory. |
| @@ -263,28 +285,6 @@ home directory hierarchy, or otherwise the absolute directory `~/.emacs-flc'." | |||
| 263 | (directory :tag "directory")))) | 285 | (directory :tag "directory")))) |
| 264 | :group 'fast-lock) | 286 | :group 'fast-lock) |
| 265 | 287 | ||
| 266 | (defcustom fast-lock-minimum-size (* 25 1024) | ||
| 267 | "*Minimum size of a buffer for cached fontification. | ||
| 268 | Only buffers more than this can have associated Font Lock cache files saved. | ||
| 269 | If nil, means cache files are never created. | ||
| 270 | If a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE), | ||
| 271 | where MAJOR-MODE is a symbol or t (meaning the default). For example: | ||
| 272 | ((c-mode . 25600) (c++-mode . 25600) (rmail-mode . 1048576)) | ||
| 273 | means that the minimum size is 25K for buffers in C or C++ modes, one megabyte | ||
| 274 | for buffers in Rmail mode, and size is irrelevant otherwise." | ||
| 275 | :type '(choice (const :tag "none" nil) | ||
| 276 | (integer :tag "size") | ||
| 277 | (repeat :menu-tag "mode specific" :tag "mode specific" | ||
| 278 | :value ((t . nil)) | ||
| 279 | (cons :tag "Instance" | ||
| 280 | (radio :tag "Mode" | ||
| 281 | (const :tag "all" t) | ||
| 282 | (symbol :tag "name")) | ||
| 283 | (radio :tag "Size" | ||
| 284 | (const :tag "none" nil) | ||
| 285 | (integer :tag "size"))))) | ||
| 286 | :group 'fast-lock) | ||
| 287 | |||
| 288 | (defcustom fast-lock-save-events '(kill-buffer kill-emacs) | 288 | (defcustom fast-lock-save-events '(kill-buffer kill-emacs) |
| 289 | "*Events under which caches will be saved. | 289 | "*Events under which caches will be saved. |
| 290 | Valid events are `save-buffer', `kill-buffer' and `kill-emacs'. | 290 | Valid events are `save-buffer', `kill-buffer' and `kill-emacs'. |