Mercurial > emacs
changeset 47147:bee830f164b7
(ibuffer-update): Revert expansion of `caddr'.
(ibuffer-fontification-alist): Check hidden buffer case isn't
visiting a file and change its face to italic.
author | John Paul Wallington <jpw@pobox.com> |
---|---|
date | Fri, 30 Aug 2002 12:42:36 +0000 |
parents | 4afe5ef50bf4 |
children | be0335657440 |
files | lisp/ChangeLog lisp/ibuffer.el |
diffstat | 2 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Aug 30 12:07:52 2002 +0000 +++ b/lisp/ChangeLog Fri Aug 30 12:42:36 2002 +0000 @@ -1,3 +1,9 @@ +2002-08-30 John Paul Wallington <jpw@shootybangbang.com> + + * ibuffer.el (ibuffer-update): Revert expansion of `caddr'. + (ibuffer-fontification-alist): Check hidden buffer case isn't + visiting a file and change its face to italic. + 2002-08-30 Juanma Barranquero <lektu@terra.es> * replace.el (occur-mode): Add interactive declaration.
--- a/lisp/ibuffer.el Fri Aug 30 12:07:52 2002 +0000 +++ b/lisp/ibuffer.el Fri Aug 30 12:42:36 2002 +0000 @@ -135,7 +135,9 @@ (defcustom ibuffer-fontification-alist `((10 buffer-read-only font-lock-constant-face) (15 (string-match "^*" (buffer-name)) font-lock-keyword-face) - (20 (string-match "^ " (buffer-name)) font-lock-warning-face) + (20 (and (string-match "^ " (buffer-name)) + (null buffer-file-name)) + italic) (25 (memq major-mode ibuffer-help-buffer-modes) font-lock-comment-face) (30 (eq major-mode 'dired-mode) font-lock-function-name-face)) "An alist describing how to fontify buffers. @@ -2014,7 +2016,7 @@ :nomini) (with-current-buffer (cadr bufs) (minibufferp))) - (car (cddr bufs)) + (caddr bufs) (cadr bufs)) (ibuffer-current-buffers-with-marks bufs) arg)))