changeset 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 2b0ee0b43ff6
children a98404fc2d91
files lisp/recentf.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/recentf.el	Wed Mar 28 03:25:56 2007 +0000
+++ b/lisp/recentf.el	Wed Mar 28 03:26:26 2007 +0000
@@ -72,7 +72,14 @@
 (defcustom recentf-save-file "~/.recentf"
   "*File to save the recent list into."
   :group 'recentf
-  :type 'file)
+  :type 'file
+  :initialize 'custom-initialize-default
+  :set (lambda (symbol value)
+         (let ((oldvalue (eval symbol)))
+           (custom-set-default symbol value)
+           (and (not (equal value oldvalue))
+                recentf-mode
+                (recentf-load-list)))))
 
 (defcustom recentf-save-file-modes 384 ;; 0600
   "Mode bits of recentf save file, as an integer, or nil.