Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
c5def0db
Commit
c5def0db
authored
Jun 02, 2000
by
Stefan Monnier
Browse files
(isearch-highlight): Turn internal-find-face into facep.
parent
2330c9d4
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
3 deletions
+6
-3
lisp/ChangeLog
lisp/ChangeLog
+4
-0
lisp/isearch.el
lisp/isearch.el
+2
-3
No files found.
lisp/ChangeLog
View file @
c5def0db
2000-06-01 Stefan Monnier <monnier@cs.yale.edu>
* isearch.el (isearch-highlight): Turn internal-find-face into facep.
2000-06-01 Dave Love <fx@gnu.org>
* hl-line.el: Rewritten using define-minor-mode.
...
...
lisp/isearch.el
View file @
c5def0db
...
...
@@ -1498,8 +1498,7 @@ If there is no completion possible, say so and continue searching."
(concat " [" current-input-method-title "]: ")
": ")
)))
(aset m 0 (upcase (aref m 0)))
m))
(concat (upcase (substring m 0 1)) (substring m 1))))
(defun isearch-message-suffix (&optional c-q-hack ellipsis)
...
...
@@ -1729,7 +1728,7 @@ If there is no completion possible, say so and continue searching."
(or isearch-overlay (setq isearch-overlay (make-overlay beg end)))
(move-overlay isearch-overlay beg end (current-buffer))
(overlay-put isearch-overlay 'face
(if (
internal-find-
face 'isearch
nil
)
(if (face
p
'isearch)
'isearch 'region))))
(defun isearch-dehighlight (totally)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment