Function: isearch-yank-internal
isearch-yank-internal is a byte-compiled function defined in
isearch.el.gz.
Signature
(isearch-yank-internal JUMPFORM)
Documentation
Pull the text from point to the point reached by JUMPFORM.
JUMPFORM is a lambda expression that takes no arguments and returns a buffer position, possibly having moved point to that position. For example, it might move point forward by a word and return point, or it might return the position of the end of the line.
Source Code
;; Defined in /usr/src/emacs/lisp/isearch.el.gz
(defun isearch-yank-internal (jumpform)
"Pull the text from point to the point reached by JUMPFORM.
JUMPFORM is a lambda expression that takes no arguments and returns
a buffer position, possibly having moved point to that position.
For example, it might move point forward by a word and return point,
or it might return the position of the end of the line."
(isearch-yank-string
(save-excursion
(and (not isearch-forward) isearch-other-end
(goto-char isearch-other-end))
(and (not isearch-success) isearch--yank-prev-point
(goto-char isearch--yank-prev-point))
(buffer-substring-no-properties
(point)
(prog1
(setq isearch--yank-prev-point (funcall jumpform))
(when isearch-success
(setq isearch--yank-prev-point nil)))))))