/[emacs]/emacs/lisp/ibuffer.el
ViewVC logotype

Diff of /emacs/lisp/ibuffer.el

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

revision 1.28 by walters, Fri May 10 03:35:35 2002 UTC revision 1.29 by walters, Mon May 13 06:00:06 2002 UTC
# Line 2074  Do not display messages if SILENT is non Line 2074  Do not display messages if SILENT is non
2074            (nreverse result)            (nreverse result)
2075          result))))          result))))
2076    
2077  (defun ibuffer-insert-filter-group (name display-name format bmarklist)  (defun ibuffer-insert-filter-group (name display-name filter-string format bmarklist)
2078    (add-text-properties    (add-text-properties
2079     (point)     (point)
2080     (progn     (progn
# Line 2082  Do not display messages if SILENT is non Line 2082  Do not display messages if SILENT is non
2082       (point))       (point))
2083     `(ibuffer-filter-group-name ,name keymap ,ibuffer-mode-filter-group-map     `(ibuffer-filter-group-name ,name keymap ,ibuffer-mode-filter-group-map
2084                                 mouse-face highlight                                 mouse-face highlight
2085                                 help-echo "mouse-1: toggle marks in this group\nmouse-2: hide/show this filtering group "))                                 help-echo ,(concat filter-string "mouse-1: toggle marks in this group\nmouse-2: hide/show this filtering group ")))
2086    (insert "\n")    (insert "\n")
2087    (when bmarklist    (when bmarklist
2088      (put-text-property      (put-text-property
# Line 2125  Do not display messages if SILENT is non Line 2125  Do not display messages if SILENT is non
2125                  (ibuffer-insert-filter-group                  (ibuffer-insert-filter-group
2126                   name                   name
2127                   (if disabled (concat name " ...") name)                   (if disabled (concat name " ...") name)
2128                     (if ext-loaded
2129                         (ibuffer-format-filter-group-data name)
2130                       "")
2131                   --ibuffer-insert-buffers-and-marks-format                   --ibuffer-insert-buffers-and-marks-format
2132                   (if disabled                   (if disabled
2133                       nil                       nil

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

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