Function: diff--forward-while-leading-char

diff--forward-while-leading-char is a byte-compiled function defined in diff-mode.el.gz.

Signature

(diff--forward-while-leading-char CHAR BOUND)

Documentation

Move point until reaching a line not starting with CHAR.

Return new point, if it was moved.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/diff-mode.el.gz
(defun diff--forward-while-leading-char (char bound)
  "Move point until reaching a line not starting with CHAR.
Return new point, if it was moved."
  (let ((pt nil))
    (while (and (< (point) bound) (eql (following-char) char))
      (forward-line 1)
      (setq pt (point)))
    pt))