Mercurial > emacs
comparison lisp/obsolete/fast-lock.el @ 80574:fb7b4a3039a9
(fast-lock-cache-directories): Remove "." from its
default value and give it the risky-local-variable property.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 12 May 2008 17:30:29 +0000 |
| parents | e68f97372143 |
| children | d2b202fafd8c |
comparison
equal
deleted
inserted
replaced
| 80573:0f133cddd741 | 80574:fb7b4a3039a9 |
|---|---|
| 284 (radio :tag "Size" | 284 (radio :tag "Size" |
| 285 (const :tag "none" nil) | 285 (const :tag "none" nil) |
| 286 (integer :tag "size"))))) | 286 (integer :tag "size"))))) |
| 287 :group 'fast-lock) | 287 :group 'fast-lock) |
| 288 | 288 |
| 289 (defcustom fast-lock-cache-directories '("." "~/.emacs-flc") | 289 (defcustom fast-lock-cache-directories '("~/.emacs-flc") |
| 290 ; - `internal', keep each file's Font Lock cache file in the same file. | 290 ; - `internal', keep each file's Font Lock cache file in the same file. |
| 291 ; - `external', keep each file's Font Lock cache file in the same directory. | 291 ; - `external', keep each file's Font Lock cache file in the same directory. |
| 292 "*Directories in which Font Lock cache files are saved and read. | 292 "*Directories in which Font Lock cache files are saved and read. |
| 293 Each item should be either DIR or a cons pair of the form (REGEXP . DIR) where | 293 Each item should be either DIR or a cons pair of the form (REGEXP . DIR) where |
| 294 DIR is a directory name (relative or absolute) and REGEXP is a regexp. | 294 DIR is a directory name (relative or absolute) and REGEXP is a regexp. |
| 302 (list (cons (concat \"^\" (regexp-quote home)) \".\") \"~/.emacs-flc\")) | 302 (list (cons (concat \"^\" (regexp-quote home)) \".\") \"~/.emacs-flc\")) |
| 303 => | 303 => |
| 304 ((\"^/your/true/home/directory/\" . \".\") \"~/.emacs-flc\") | 304 ((\"^/your/true/home/directory/\" . \".\") \"~/.emacs-flc\") |
| 305 | 305 |
| 306 would cause a file's current directory to be used if the file is under your | 306 would cause a file's current directory to be used if the file is under your |
| 307 home directory hierarchy, or otherwise the absolute directory `~/.emacs-flc'." | 307 home directory hierarchy, or otherwise the absolute directory `~/.emacs-flc'. |
| 308 For security reasons, it is not advisable to use the file's current directory | |
| 309 to avoid the possibility of using the cache of another user." | |
| 308 :type '(repeat (radio (directory :tag "directory") | 310 :type '(repeat (radio (directory :tag "directory") |
| 309 (cons :tag "Matching" | 311 (cons :tag "Matching" |
| 310 (regexp :tag "regexp") | 312 (regexp :tag "regexp") |
| 311 (directory :tag "directory")))) | 313 (directory :tag "directory")))) |
| 312 :group 'fast-lock) | 314 :group 'fast-lock) |
| 315 (put 'fast-lock-cache-directories 'risky-local-variable t) | |
| 313 | 316 |
| 314 (defcustom fast-lock-save-events '(kill-buffer kill-emacs) | 317 (defcustom fast-lock-save-events '(kill-buffer kill-emacs) |
| 315 "*Events under which caches will be saved. | 318 "*Events under which caches will be saved. |
| 316 Valid events are `save-buffer', `kill-buffer' and `kill-emacs'. | 319 Valid events are `save-buffer', `kill-buffer' and `kill-emacs'. |
| 317 If concurrent editing sessions use the same associated cache file for a file's | 320 If concurrent editing sessions use the same associated cache file for a file's |