/[emacs]/emacs/lisp/ibuf-ext.el
ViewVC logotype

Diff of /emacs/lisp/ibuf-ext.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.47 by jpw, Thu Nov 17 22:56:28 2005 UTC revision 1.48 by jpw, Thu Dec 8 23:48:18 2005 UTC
# Line 1021  currently used by buffers." Line 1021  currently used by buffers."
1021    (ibuffer-awhen (with-current-buffer buf    (ibuffer-awhen (with-current-buffer buf
1022                     (or buffer-file-name                     (or buffer-file-name
1023                         (and (boundp 'dired-directory)                         (and (boundp 'dired-directory)
1024                              (if (stringp dired-directory)                              (let ((dired-dir
1025                                  dired-directory                                     (if (stringp dired-directory)
1026                                (car dired-directory))                                         dired-directory
1027                              (expand-file-name dired-directory))))                                       (car dired-directory))))
1028                                  (and dired-dir
1029                                       (expand-file-name dired-dir))))))
1030      (string-match qualifier it)))      (string-match qualifier it)))
1031    
1032  ;;;###autoload (autoload 'ibuffer-filter-by-size-gt  "ibuf-ext")  ;;;###autoload (autoload 'ibuffer-filter-by-size-gt  "ibuf-ext")

Legend:
Removed from v.1.47  
changed lines
  Added in v.1.48

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26