diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-01-05 20:49:11 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-01-05 20:49:11 +0000 |
| commit | 4dbbcb46d91862a16b21651e0b95e5959ffdbfb8 (patch) | |
| tree | 5e6f526b08c99ffa2057e621b6af378c24b48245 /lisp/isearch.el | |
| parent | 436c08c28835f5c0f7080a1ddd3a876f65e16145 (diff) | |
| download | emacs-4dbbcb46d91862a16b21651e0b95e5959ffdbfb8.tar.gz | |
(isearch-dehighlight): Remove unused arg `totally'.
(isearch-update, isearch-done): Adjust calls accordingly.
Diffstat (limited to 'lisp/isearch.el')
| -rw-r--r-- | lisp/isearch.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index a87097f884e..8f2875d6726 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1,7 +1,7 @@ ;;; isearch.el --- incremental search minor mode ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1999, -;; 2000, 2001, 2003, 2004 Free Software Foundation, Inc. +;; 2000, 2001, 2003, 2004, 2005 Free Software Foundation, Inc. ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu> ;; Maintainer: FSF @@ -705,7 +705,7 @@ is treated as a regexp. See \\[isearch-forward] for more info." (if (< isearch-other-end (point)) ; isearch-forward? (isearch-highlight isearch-other-end (point)) (isearch-highlight (point) isearch-other-end)) - (isearch-dehighlight nil)) + (isearch-dehighlight)) )) (setq ;; quit-flag nil not for isearch-mode isearch-adjusted nil @@ -733,7 +733,7 @@ is treated as a regexp. See \\[isearch-forward] for more info." (setq overriding-terminal-local-map nil) ;; (setq pre-command-hook isearch-old-pre-command-hook) ; for lemacs (setq minibuffer-message-timeout isearch-original-minibuffer-message-timeout) - (isearch-dehighlight t) + (isearch-dehighlight) (isearch-lazy-highlight-cleanup lazy-highlight-cleanup) (let ((found-start (window-start (selected-window))) (found-point (point))) @@ -2220,7 +2220,7 @@ Can be changed via `isearch-search-fun-function' for special needs." (overlay-put isearch-overlay 'priority 1) ;higher than lazy overlays )))) -(defun isearch-dehighlight (totally) +(defun isearch-dehighlight () (when isearch-overlay (delete-overlay isearch-overlay))) |