(recentf-filename-handler): Add custom choice

`abbreviate-file-name'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0cdcdccad279d82f063a9c577c541e54fa674f9c..3705f71c5ef92e06abec787cc5ea7c3c3ca1d12b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2005-09-08  Reiner Steib  <Reiner.Steib@gmx.de>
 
+       * recentf.el (recentf-filename-handler): Add custom choice
+       `abbreviate-file-name'.
+
        * msb.el (msb--very-many-menus): Fix typo.
 
        * disp-table.el (standard-display-european): Don't set

diff --git a/lisp/recentf.el b/lisp/recentf.el
index adc4dd023bfb4d5078e1d62d3bfbcead8ac13611..202515089413df4e8baafcc31f8e57c24556bb8d 100644 (file)
--- a/lisp/recentf.el
+++ b/lisp/recentf.el
@@ -257,6 +257,7 @@ It is passed a filename to give a chance to transform it.
 If it returns nil, the filename is left unchanged."
   :group 'recentf
   :type '(choice (const :tag "None" nil)
+                (const abbreviate-file-name)
                  function))
 
 (defcustom recentf-show-file-shortcuts-flag t