[Emacs-diffs] Changes to emacs/lisp/recentf.el

[Juanma Barranquero]

Index: emacs/lisp/recentf.el
diff -c emacs/lisp/recentf.el:1.40 emacs/lisp/recentf.el:1.41
*** emacs/lisp/recentf.el:1.40  Mon Jul  4 23:08:57 2005
--- emacs/lisp/recentf.el       Thu Jul 28 13:00:18 2005
***************
*** 65,71 ****
  
  (defcustom recentf-max-saved-items 20
    "*Maximum number of items of the recent list that will be saved.
! nil means to save the whole list.
  See the command `recentf-save-list'."
    :group 'recentf
    :type 'integer)
--- 65,71 ----
  
  (defcustom recentf-max-saved-items 20
    "*Maximum number of items of the recent list that will be saved.
! A nil value means to save the whole list.
  See the command `recentf-save-list'."
    :group 'recentf
    :type 'integer)
***************
*** 145,151 ****
  
  (defcustom recentf-menu-filter nil
    "*Function used to filter files displayed in the recentf menu.
! nil means no filter.  The following functions are predefined:
  
  - `recentf-sort-ascending'
      Sort menu items in ascending order.
--- 145,151 ----
  
  (defcustom recentf-menu-filter nil
    "*Function used to filter files displayed in the recentf menu.
! A nil value means no filter.  The following functions are predefined:
  
  - `recentf-sort-ascending'
      Sort menu items in ascending order.
***************
*** 199,214 ****
    :set 'recentf-menu-customization-changed)
  
  (defcustom recentf-menu-append-commands-flag t
!   "*non-nil means to append command items to the menu."
    :group 'recentf
    :type 'boolean
    :set 'recentf-menu-customization-changed)
  
! (defvaralias 'recentf-menu-append-commands-p
!   'recentf-menu-append-commands-flag)
! (make-obsolete-variable 'recentf-menu-append-commands-p
!                         'recentf-menu-append-commands-flag
!                         "22.1")
  
  (defcustom recentf-auto-cleanup 'mode
    "*Define when to automatically cleanup the recent list.
--- 199,212 ----
    :set 'recentf-menu-customization-changed)
  
  (defcustom recentf-menu-append-commands-flag t
!   "*Non-nil means to append command items to the menu."
    :group 'recentf
    :type 'boolean
    :set 'recentf-menu-customization-changed)
  
! (define-obsolete-variable-alias 'recentf-menu-append-commands-p
!                                 'recentf-menu-append-commands-flag
!                                 "22.1")
  
  (defcustom recentf-auto-cleanup 'mode
    "*Define when to automatically cleanup the recent list.
***************
*** 244,250 ****
             (recentf-auto-cleanup))))
  
  (defcustom recentf-initialize-file-name-history t
!   "*non-nil means to initialize `file-name-history' with the recent list.
  If `file-name-history' is not empty, do nothing."
    :group 'recentf
    :type  'boolean)
--- 242,248 ----
             (recentf-auto-cleanup))))
  
  (defcustom recentf-initialize-file-name-history t
!   "*Non-nil means to initialize `file-name-history' with the recent list.
  If `file-name-history' is not empty, do nothing."
    :group 'recentf
    :type  'boolean)
***************
*** 350,357 ****
  (defsubst recentf-expand-file-name (name)
    "Convert filename NAME to absolute, and canonicalize it.
  See also the function `expand-file-name'.
! If defined, call the function `recentf-filename-handler' to post
! process the canonical name."
    (let* ((filename (expand-file-name name)))
      (or (and recentf-filename-handler
               (funcall recentf-filename-handler filename))
--- 348,355 ----
  (defsubst recentf-expand-file-name (name)
    "Convert filename NAME to absolute, and canonicalize it.
  See also the function `expand-file-name'.
! If defined, call the function `recentf-filename-handler'
! to postprocess the canonical name."
    (let* ((filename (expand-file-name name)))
      (or (and recentf-filename-handler
               (funcall recentf-filename-handler filename))
***************
*** 557,563 ****
  
  (defun recentf-clear-data ()
    "Clear data used to build the recentf menu.
! This force a rebuild of the menu."
    (easy-menu-remove-item (recentf-menu-bar)
                           recentf-menu-path recentf-menu-title)
    (setq recentf-data-cache nil))
--- 555,561 ----
  
  (defun recentf-clear-data ()
    "Clear data used to build the recentf menu.
! This forces a rebuild of the menu."
    (easy-menu-remove-item (recentf-menu-bar)
                           recentf-menu-path recentf-menu-title)
    (setq recentf-data-cache nil))
***************
*** 703,709 ****
  
  (defcustom recentf-arrange-by-rule-subfilter nil
    "*Function called by a rule based filter to filter sub-menu elements.
! nil means no filter.  See also `recentf-menu-filter'.
  You can't use another rule based filter here."
    :group 'recentf-filters
    :type '(choice (const nil) function)
--- 701,707 ----
  
  (defcustom recentf-arrange-by-rule-subfilter nil
    "*Function called by a rule based filter to filter sub-menu elements.
! A nil value means no filter.  See also `recentf-menu-filter'.
  You can't use another rule based filter here."
    :group 'recentf-filters
    :type '(choice (const nil) function)