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

[Kim F . Storm]

Index: emacs/lisp/recentf.el
diff -c emacs/lisp/recentf.el:1.32 emacs/lisp/recentf.el:1.33
*** emacs/lisp/recentf.el:1.32  Sat Nov  6 18:27:56 2004
--- emacs/lisp/recentf.el       Wed Feb  9 15:50:41 2005
***************
*** 192,198 ****
    'recentf-menu-append-commands-flag)
  (make-obsolete-variable 'recentf-menu-append-commands-p
                          'recentf-menu-append-commands-flag
!                         "21.4")
  
  (defcustom recentf-keep-non-readable-files-flag nil
    "*non-nil means to keep non readable files in the recent list."
--- 192,198 ----
    'recentf-menu-append-commands-flag)
  (make-obsolete-variable 'recentf-menu-append-commands-p
                          'recentf-menu-append-commands-flag
!                         "22.1")
  
  (defcustom recentf-keep-non-readable-files-flag nil
    "*non-nil means to keep non readable files in the recent list."
***************
*** 203,209 ****
    'recentf-keep-non-readable-files-flag)
  (make-obsolete-variable 'recentf-keep-non-readable-files-p
                          'recentf-keep-non-readable-files-flag
!                         "21.4")
  
  (defcustom recentf-auto-cleanup 'mode
    "*Define when to automatically cleanup the recent list.
--- 203,209 ----
    'recentf-keep-non-readable-files-flag)
  (make-obsolete-variable 'recentf-keep-non-readable-files-p
                          'recentf-keep-non-readable-files-flag
!                         "22.1")
  
  (defcustom recentf-auto-cleanup 'mode
    "*Define when to automatically cleanup the recent list.
***************
*** 740,746 ****
                  elts  (cdr elts)))
          (unless menu
            (push elt others)))
!       
        (setq l nil
              min (if (natnump recentf-arrange-by-rules-min-items)
                      recentf-arrange-by-rules-min-items 0))
--- 740,746 ----
                  elts  (cdr elts)))
          (unless menu
            (push elt others)))
! 
        (setq l nil
              min (if (natnump recentf-arrange-by-rules-min-items)
                      recentf-arrange-by-rules-min-items 0))
***************
*** 755,761 ****
               menu (recentf-apply-menu-filter
                     recentf-arrange-by-rule-subfilter (nreverse elts)))
              (push menu l))))
!       
        (if (and (stringp recentf-arrange-by-rule-others) others)
            (nreverse
             (cons
--- 755,761 ----
               menu (recentf-apply-menu-filter
                     recentf-arrange-by-rule-subfilter (nreverse elts)))
              (push menu l))))
! 
        (if (and (stringp recentf-arrange-by-rule-others) others)
            (nreverse
             (cons