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

[Colin Walters]

Index: emacs/lisp/ibuffer.el
diff -c emacs/lisp/ibuffer.el:1.22 emacs/lisp/ibuffer.el:1.23
*** emacs/lisp/ibuffer.el:1.22  Thu Apr 25 15:03:12 2002
--- emacs/lisp/ibuffer.el       Thu Apr 25 23:59:18 2002
***************
*** 1580,1589 ****
    (format "%s" mode-name))
  
  (define-ibuffer-column process ()
!   (let ((proc (get-buffer-process buffer)))
!     (if proc 
!       (format "(%s %s)" proc (process-status proc))
!       "none")))
  
  (define-ibuffer-column filename ()
    (let ((directory-abbrev-alist ibuffer-directory-abbrev-alist))
--- 1580,1588 ----
    (format "%s" mode-name))
  
  (define-ibuffer-column process ()
!   (ibuffer-aif (get-buffer-process buffer)
!       (format "(%s %s)" it (process-status it))
!     "none"))
  
  (define-ibuffer-column filename ()
    (let ((directory-abbrev-alist ibuffer-directory-abbrev-alist))