Function: semantic-html-set-endpoint

semantic-html-set-endpoint is a byte-compiled function defined in html.el.gz.

Signature

(semantic-html-set-endpoint METATAGLIST PNT)

Documentation

Set the end point of the first section tag in METATAGLIST to PNT.

METATAGLIST is a list of tags in the intermediate tag format used by the html parser. PNT is the new point to set.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/html.el.gz
(defun semantic-html-set-endpoint (metataglist pnt)
  "Set the end point of the first section tag in METATAGLIST to PNT.
METATAGLIST is a list of tags in the intermediate tag format used by the
html parser.  PNT is the new point to set."
  (let ((metatag nil))
    (while (and metataglist
		(not (eq (semantic-tag-class (car metataglist)) 'section)))
      (setq metataglist (cdr metataglist)))
    (setq metatag (car metataglist))
    (when metatag
      (setcar (nthcdr (1- (length metatag)) metatag) pnt)
      metatag)))