Mercurial > emacs
changeset 43490:a08f4763cba4
(ibuffer-old-time): Change to hours.
(ibuffer-mark-old-buffers): Handle it.
| author | Colin Walters <walters@gnu.org> |
|---|---|
| date | Sat, 23 Feb 2002 21:33:49 +0000 |
| parents | ffa9b62fa5b9 |
| children | 8d50d4fa8c4b |
| files | lisp/ibuf-ext.el |
| diffstat | 1 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ibuf-ext.el Sat Feb 23 21:33:33 2002 +0000 +++ b/lisp/ibuf-ext.el Sat Feb 23 21:33:49 2002 +0000 @@ -147,9 +147,12 @@ (defvar ibuffer-cached-filter-formats nil) (defvar ibuffer-compiled-filter-formats nil) -(defcustom ibuffer-old-time 3 - "The number of days before a buffer is considered \"old\"." - :type 'integer +(defcustom ibuffer-old-time 72 + "The number of hours before a buffer is considered \"old\"." + :type '(choice (const :tag "72 hours (3 days)" 72) + (const :tag "48 hours (2 days)" 48) + (const :tag "24 hours (1 day)" 24) + (integer :tag "hours")) :group 'ibuffer) (defcustom ibuffer-save-with-custom t @@ -1017,7 +1020,7 @@ (car buffer-display-time)) (float (cadr buffer-display-time)) (* 0.0000001 (caddr buffer-display-time))))) - (> (- now then) (* 24 60 60 ibuffer-old-time)))))))) + (> (- now then) (* 60 60 ibuffer-old-time)))))))) ;;;###autoload (defun ibuffer-mark-special-buffers ()