diff options
author | Juri Linkov <juri@jurta.org> | 2012-05-29 12:09:38 +0300 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2012-05-29 12:09:38 +0300 |
commit | 8cbd80f7138bcf61518ecaab76d1b762b2510c21 (patch) | |
tree | c16f740545d0a9fcb473f7f4b3726cbd5c37f245 /lisp/hexl.el | |
parent | c846da43835e99fa53c772814aa43c9ae7ac571b (diff) | |
download | emacs-8cbd80f7138bcf61518ecaab76d1b762b2510c21.tar.gz |
* lisp/isearch.el (isearch-search-fun-default): New function.
(isearch-search-fun): Move default part to the new function
`isearch-search-fun-default'.
(isearch-search-fun-function): Set the default value to
`isearch-search-fun-default'.
* lisp/comint.el (comint-history-isearch-end):
Use `isearch-search-fun-default'.
(comint-history-isearch-search): Use `isearch-search-fun-default'
and remove spacial case for `isearch-word'.
(comint-history-isearch-wrap): Remove spacial case for
`isearch-word'.
* lisp/hexl.el (hexl-isearch-search-function):
Use `isearch-search-fun-default'.
* lisp/info.el (Info-isearch-search): Use `isearch-search-fun-default'.
Use `word-search-regexp' for `isearch-word'.
* lisp/misearch.el (multi-isearch-search-fun):
Use `isearch-search-fun-default'.
* lisp/simple.el (minibuffer-history-isearch-search):
Use `isearch-search-fun-default' and remove spacial case for
`isearch-word'.
(minibuffer-history-isearch-wrap): Remove spacial case for
`isearch-word'.
* lisp/textmodes/reftex-global.el (reftex-isearch-wrap-function):
Remove spacial case for `isearch-word'.
(reftex-isearch-isearch-search): Use `isearch-search-fun-default'.
Fixes: debbugs:11381
Diffstat (limited to 'lisp/hexl.el')
-rw-r--r-- | lisp/hexl.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index bedcc6b10b9..a754a151fb7 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -420,8 +420,7 @@ You can use \\[hexl-find-file] to visit a file in Hexl mode. " \\(?: .+\n[a-f0-9]+: \\)?")) textre)) bound noerror count)) - (let ((isearch-search-fun-function nil)) - (isearch-search-fun)))) + (isearch-search-fun-default))) (defvar hexl-in-save-buffer nil) |