Revert introduction of isearch-filter-predicates.

[bpt/emacs.git] / lisp / wdired.el

diff --git a/lisp/wdired.el b/lisp/wdired.el
index 55665fb..6c2c977 100644 (file)
--- a/lisp/wdired.el
+++ b/lisp/wdired.el
@@ -239,7 +239,8 @@ See `wdired-mode'."
        (dired-remember-marks (point-min) (point-max)))
   (set (make-local-variable 'wdired-old-point) (point))
   (set (make-local-variable 'query-replace-skip-read-only) t)
-  (add-hook 'isearch-filter-predicates 'wdired-isearch-filter-read-only nil t)
+  (add-function :after-while (local 'isearch-filter-predicate)
+                #'wdired-isearch-filter-read-only)
   (use-local-map wdired-mode-map)
   (force-mode-line-update)
   (setq buffer-read-only nil)