Correct two search limits in c-before-change-check_<>-operators.

[gnu-emacs] / lisp / ibuffer.el

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 17be5534138b55a5f28275b9d19a97b4892df6d7..536992f5bc8212d1aa0425e75ed96faf48be28aa 100644 (file)
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -2140,11 +2140,10 @@ If optional arg SILENT is non-nil, do not display progress messages."
   (unless silent
     (message "Redisplaying current buffer list..."))
   (let ((blist (ibuffer-current-state-list)))
-    (when (null blist)
-      (if (and (featurep 'ibuf-ext)
+    (when (and (null blist)
+              (featurep 'ibuf-ext)
               (or ibuffer-filtering-qualifiers ibuffer-hidden-filter-groups))
-         (message "No buffers! (note: filtering in effect)")
-       (error "No buffers!")))
+      (message "No buffers! (note: filtering in effect)"))
     (ibuffer-redisplay-engine blist t)
     (unless silent
       (message "Redisplaying current buffer list...done"))
@@ -2174,11 +2173,10 @@ If optional arg SILENT is non-nil, do not display progress messages."
                   (cadr bufs))
                 (ibuffer-current-buffers-with-marks bufs)
                 ibuffer-display-maybe-show-predicates)))
-    (when (null blist)
-      (if (and (featurep 'ibuf-ext)
-              ibuffer-filtering-qualifiers)
-         (message "No buffers! (note: filtering in effect)")
-       (error "No buffers!")))
+    (and (null blist)
+        (featurep 'ibuf-ext)
+        ibuffer-filtering-qualifiers
+        (message "No buffers! (note: filtering in effect)"))
     (unless silent
       (message "Updating buffer list..."))
     (ibuffer-redisplay-engine blist arg)