emacs: Do not abuse advice to monkey patch while testing

[notmuch] / test / test-lib.el

diff --git a/test/test-lib.el b/test/test-lib.el
index 044c2da46639226a5f5acb1fcaf81ec21566117f..ec16c59c60fff25b0c2f0fafcb3a3f7ae520c851 100644 (file)
--- a/test/test-lib.el
+++ b/test/test-lib.el
@@ -97,14 +97,6 @@ running, quit if it terminated."
 (add-hook 'notmuch-hello-refresh-hook
          (lambda () (cl-incf notmuch-hello-refresh-hook-counter)))
 
-(defadvice notmuch-search-process-filter (around pessimal activate disable)
-  "Feed notmuch-search-process-filter one character at a time."
-  (let ((string (ad-get-arg 1)))
-    (cl-loop for char across string
-            do (progn
-                 (ad-set-arg 1 (char-to-string char))
-                 ad-do-it))))
-
 (defun notmuch-test-mark-links ()
   "Enclose links in the current buffer with << and >>."
   ;; Links are often created by jit-lock functions