From: John Paul Wallington <jpw@pobox.com>
Date: Sat, 5 Apr 2003 01:03:23 +0000 (+0000)
Subject: (ibuffer-insert-filter-group): Fix spazz.
X-Git-Tag: ttn-vms-21-2-B4~10633
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ce3a4c83413e8df2d2163dbae43c49367826b213;p=emacs.git

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

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index c6209e1a07f..a60abda6c5a 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -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