Mercurial > emacs
comparison lisp/recentf.el @ 76773:e0a9f7f7486a
Stephen Berman <Stephen.Berman at gmx.net>:
(recentf-save-file): Add a custom :set function.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Wed, 28 Mar 2007 03:26:26 +0000 |
| parents | e3694f1cb928 |
| children | 9355f9b7bbff 5608c829dbac dc002877ce12 4ef881a120fe |
comparison
equal
deleted
inserted
replaced
| 76772:2b0ee0b43ff6 | 76773:e0a9f7f7486a |
|---|---|
| 70 :type 'integer) | 70 :type 'integer) |
| 71 | 71 |
| 72 (defcustom recentf-save-file "~/.recentf" | 72 (defcustom recentf-save-file "~/.recentf" |
| 73 "*File to save the recent list into." | 73 "*File to save the recent list into." |
| 74 :group 'recentf | 74 :group 'recentf |
| 75 :type 'file) | 75 :type 'file |
| 76 :initialize 'custom-initialize-default | |
| 77 :set (lambda (symbol value) | |
| 78 (let ((oldvalue (eval symbol))) | |
| 79 (custom-set-default symbol value) | |
| 80 (and (not (equal value oldvalue)) | |
| 81 recentf-mode | |
| 82 (recentf-load-list))))) | |
| 76 | 83 |
| 77 (defcustom recentf-save-file-modes 384 ;; 0600 | 84 (defcustom recentf-save-file-modes 384 ;; 0600 |
| 78 "Mode bits of recentf save file, as an integer, or nil. | 85 "Mode bits of recentf save file, as an integer, or nil. |
| 79 If non-nil, after writing `recentf-save-file', set its mode bits to | 86 If non-nil, after writing `recentf-save-file', set its mode bits to |
| 80 this value. By default give R/W access only to the user who owns that | 87 this value. By default give R/W access only to the user who owns that |