(ibuffer-insert-filter-group): Fix spazz.

This commit is contained in:
John Paul Wallington 2003-04-05 01:03:23 +00:00
parent da2c1d6bd1
commit ce3a4c8341

View file

@ -2067,9 +2067,11 @@ If optional arg SILENT is non-nil, do not display progress messages."
mouse-face highlight
help-echo ,(let ((echo '(if tooltip-mode
"mouse-1: toggle marks in this group\nmouse-2: hide/show this filtering group"
" mouse-1: toggle marks mouse-2: hide/show")))
"mouse-1: toggle marks mouse-2: hide/show")))
(if (> (length filter-string) 0)
`(concat ,filter-string (and tooltip-mode "\n") ,echo)
`(concat ,filter-string
(if tooltip-mode "\n" " ")
,echo)
echo))))
(insert "\n")
(when bmarklist