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 |