Function: hs-hide-initial-comment-block
hs-hide-initial-comment-block is an interactive and byte-compiled
function defined in hideshow.el.gz.
Signature
(hs-hide-initial-comment-block)
Documentation
Hide the first block of comments in a file.
This can be useful if you have huge RCS logs in those comments.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/hideshow.el.gz
(defun hs-hide-initial-comment-block ()
"Hide the first block of comments in a file.
This can be useful if you have huge RCS logs in those comments."
(interactive)
(hs-life-goes-on
(let ((c-reg (save-excursion
(goto-char (point-min))
(skip-chars-forward " \t\n\f")
(hs-inside-comment-p))))
(when c-reg
(let ((beg (car c-reg)) (end (cadr c-reg)))
;; see if we have enough comment lines to hide
(when (> (count-lines beg end) 1)
(hs-hide-comment-region beg end)))))))