(ibuffer-filter-disable): Move back to the current buffer after

removing limits.
(ibuffer-pop-filter): Ditto.
Update copyright.
From: Romain Francoise <romain@orebokech.com>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 01fb5a5e6b429af4f3842ba367db2b6efd48d97f..8964538ee3e906ba86f19061646db268ae6994ac 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2005-03-02  Romain Francoise  <romain@orebokech.com>
+
+       * ibuf-ext.el (ibuffer-filter-disable): Move back to the current
+       buffer after removing limits.
+       (ibuffer-pop-filter): Ditto.
+       Update copyright.
+
 2005-03-02  Miles Bader  <miles@gnu.org>
 
        * button.el (make-text-button): If the user doesn't specify a

diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index bed4330d0c267857b277e6e93e1ae80e0563c162..e2e5d25137194c9a575f8ff78f37db339ba4bbb5 100644 (file)
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -1,6 +1,6 @@
 ;;; ibuf-ext.el --- extensions for ibuffer
 
-;; Copyright (C) 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
 
 ;; Author: Colin Walters <walters@verbum.org>
 ;; Maintainer: John Paul Wallington <jpw@gnu.org>
@@ -753,7 +753,10 @@ of replacing the current filters."
   "Disable all filters currently in effect in this buffer."
   (interactive)
   (setq ibuffer-filtering-qualifiers nil)
-  (ibuffer-update nil t))
+  (let ((buf (ibuffer-current-buffer)))
+    (ibuffer-update nil t)
+    (when buf
+      (ibuffer-jump-to-buffer (buffer-name buf)))))
 
 ;;;###autoload
 (defun ibuffer-pop-filter ()
@@ -762,7 +765,10 @@ of replacing the current filters."
   (when (null ibuffer-filtering-qualifiers)
     (error "No filters in effect"))
   (pop ibuffer-filtering-qualifiers)
-  (ibuffer-update nil t))
+  (let ((buf (ibuffer-current-buffer)))
+    (ibuffer-update nil t)
+    (when buf
+      (ibuffer-jump-to-buffer (buffer-name buf)))))
 
 (defun ibuffer-push-filter (qualifier)
   "Add QUALIFIER to `ibuffer-filtering-qualifiers'."