diff options
| -rw-r--r-- | test/lisp/ibuffer-tests.el | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/test/lisp/ibuffer-tests.el b/test/lisp/ibuffer-tests.el index a99a5754e2f..3a4def3a2b0 100644 --- a/test/lisp/ibuffer-tests.el +++ b/test/lisp/ibuffer-tests.el @@ -32,6 +32,22 @@ (symbol-function 'ibuffer-mark-unsaved-buffers)))) +(ert-deftest ibuffer-test-Bug24997 () + "Test for http://debbugs.gnu.org/24997 ." + :expected-result :failed + (ibuffer) + (let ((orig ibuffer-filtering-qualifiers)) + (unwind-protect + (progn + (setq ibuffer-filtering-qualifiers + '((size-gt . 10) + (used-mode . lisp-interaction-mode))) + (ibuffer-update nil t) + (ignore-errors (ibuffer-decompose-filter)) + (should (cdr ibuffer-filtering-qualifiers))) + (setq ibuffer-filtering-qualifiers orig) + (ibuffer-update nil t)))) + (ert-deftest ibuffer-test-Bug25000 () "Test for http://debbugs.gnu.org/25000 ." :expected-result :failed |