aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2010-09-18 00:09:58 +0200
committerStefan Monnier2010-09-18 00:09:58 +0200
commit4be520fbecbb9c5518838effc54518ddf919351d (patch)
treeae4485a33f214680ff2a7463588fddf2491979cf
parent69e847be9279a21364638f38ac4376c6f2583590 (diff)
downloademacs-4be520fbecbb9c5518838effc54518ddf919351d.tar.gz
emacs-4be520fbecbb9c5518838effc54518ddf919351d.zip
* lisp/isearch.el (isearch-face): Rename from `isearch'.
(isearch-highlight): Use new name.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/isearch.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cd44a207ce2..8edbfe85823 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12010-09-17 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * isearch.el (isearch-face): Rename from `isearch'.
4 (isearch-highlight): Use new name.
5
12010-09-17 Eli Zaretskii <eliz@gnu.org> 62010-09-17 Eli Zaretskii <eliz@gnu.org>
2 7
3 * fringe.el (fringe-mode, fringe-query-style): Use 4 pixels, not 8 * fringe.el (fringe-mode, fringe-query-style): Use 4 pixels, not
diff --git a/lisp/isearch.el b/lisp/isearch.el
index f18a74c59b5..ea3476dca06 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -239,7 +239,7 @@ Default value, nil, means edit the string instead."
239 "Face for highlighting Isearch matches." 239 "Face for highlighting Isearch matches."
240 :group 'isearch 240 :group 'isearch
241 :group 'basic-faces) 241 :group 'basic-faces)
242(defvar isearch 'isearch) 242(defvar isearch-face 'isearch)
243 243
244(defface isearch-fail 244(defface isearch-fail
245 '((((class color) (min-colors 88) (background light)) 245 '((((class color) (min-colors 88) (background light))
@@ -2537,7 +2537,7 @@ since they have special meaning in a regexp."
2537 (setq isearch-overlay (make-overlay beg end)) 2537 (setq isearch-overlay (make-overlay beg end))
2538 ;; 1001 is higher than lazy's 1000 and ediff's 100+ 2538 ;; 1001 is higher than lazy's 1000 and ediff's 100+
2539 (overlay-put isearch-overlay 'priority 1001) 2539 (overlay-put isearch-overlay 'priority 1001)
2540 (overlay-put isearch-overlay 'face isearch)))) 2540 (overlay-put isearch-overlay 'face isearch-face))))
2541 2541
2542(defun isearch-dehighlight () 2542(defun isearch-dehighlight ()
2543 (when isearch-overlay 2543 (when isearch-overlay