Function: erc--skip-past-headroom-on-clear
erc--skip-past-headroom-on-clear is a byte-compiled function defined
in erc.el.gz.
Signature
(erc--skip-past-headroom-on-clear BEG END)
Documentation
Move marker BEG past the two newlines added by erc--initialize-markers.
Source Code
;; Defined in /usr/src/emacs/lisp/erc/erc.el.gz
(defun erc--skip-past-headroom-on-clear (beg end)
"Move marker BEG past the two newlines added by `erc--initialize-markers'."
(when (and (not (buffer-narrowed-p)) (= beg (point-min)))
(save-excursion
(goto-char (point-min))
(let ((pos (skip-chars-forward "\n" (if erc--called-as-input-p 2 3))))
(set-marker beg (min (1+ pos) end erc-input-marker))))))