/[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.32 by jpw, Tue Feb 11 14:59:54 2003 UTC revision 1.33 by jpw, Fri Apr 4 21:47:03 2003 UTC
# Line 917  of replacing the current filters." Line 917  of replacing the current filters."
917  (defun ibuffer-format-filter-group-data (filter)  (defun ibuffer-format-filter-group-data (filter)
918    (if (equal filter "Default")    (if (equal filter "Default")
919        ""        ""
920      (concat "Filter: " (mapconcat #'ibuffer-format-qualifier      (concat "Filter:" (mapconcat #'ibuffer-format-qualifier
921                                    (cdr (assq filter ibuffer-filter-groups))                                   (cdr (assq filter ibuffer-filter-groups))
922                                    " ") "\n")))                                   " "))))
923    
924  (defun ibuffer-format-qualifier (qualifier)  (defun ibuffer-format-qualifier (qualifier)
925    (if (eq (car-safe qualifier) 'not)    (if (eq (car-safe qualifier) 'not)

Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33

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