Function: isearch-process-search-char
isearch-process-search-char is a byte-compiled function defined in
isearch.el.gz.
Signature
(isearch-process-search-char CHAR &optional COUNT)
Documentation
Add CHAR to the search string, COUNT times.
Search is updated accordingly.
Source Code
;; Defined in /usr/src/emacs/lisp/isearch.el.gz
(defun isearch-process-search-char (char &optional count)
"Add CHAR to the search string, COUNT times.
Search is updated accordingly."
;; * and ? are special in regexps when not preceded by \.
;; } and | are special in regexps when preceded by \.
;; Nothing special for + because it matches at least once.
(cond
((memq char '(?* ??)) (isearch-fallback nil))
((eq char ?\}) (isearch-fallback t t))
((eq char ?|) (isearch-fallback t nil t)))
;; Append the char(s) to the search string,
;; update the message and re-search.
(let* ((string (if (and (integerp count) (> count 1))
(make-string count char)
(char-to-string char)))
(message (if (>= char ?\200)
string
(mapconcat 'isearch-text-char-description string ""))))
(isearch-process-search-string string message)))