From: Tino Calancha <tino.calancha@gmail.com>
Date: Thu, 15 Dec 2016 06:02:32 +0000 (+0900)
Subject: * lisp/ibuf-macs.el (define-ibuffer-filter): Wrap ,@body in a progn.
X-Git-Tag: emacs-26.0.90~1080
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0a5898c3dd2e32431268bc2bcf3536d4cd62ad39;p=emacs.git

* lisp/ibuf-macs.el (define-ibuffer-filter): Wrap ,@body in a progn.
---

diff --git a/lisp/ibuf-macs.el b/lisp/ibuf-macs.el
index 3c95f4c44ce..fc8c127c1c3 100644
--- a/lisp/ibuf-macs.el
+++ b/lisp/ibuf-macs.el
@@ -304,7 +304,7 @@ bound to the current value of the filter.
        (push (list ',name ,description
 		   (lambda (buf qualifier)
                      (condition-case nil
-                         ,@body
+                         (progn ,@body)
                        (error (ibuffer-pop-filter)
                               (when (eq ',name 'predicate)
                                 (error "Wrong filter predicate: %S"