Function: hs-hide-comment-region

hs-hide-comment-region is a byte-compiled function defined in hideshow.el.gz.

Signature

(hs-hide-comment-region BEG END &optional REPOS-END)

Documentation

Hide a region from BEG to END, marking it as a comment.

Optional arg REPOS-END means reposition at end.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/hideshow.el.gz
(defun hs-hide-comment-region (beg end &optional repos-end)
  "Hide a region from BEG to END, marking it as a comment.
Optional arg REPOS-END means reposition at end."
  (let ((goal-col (current-column))
        (beg-bol (progn (goto-char beg) (line-beginning-position)))
        (beg-eol (line-end-position))
        (end-eol (progn (goto-char end) (line-end-position))))
    (hs-discard-overlays beg-eol end-eol)
    (hs-make-overlay beg-eol end-eol 'comment beg end)
    (goto-char (if repos-end end (min end (+ beg-bol goal-col))))))