Function: semantic-html-extract-section-name

semantic-html-extract-section-name is a byte-compiled function defined in html.el.gz.

Signature

(semantic-html-extract-section-name)

Documentation

Extract a section name from the current buffer and point.

Assume the cursor is in the tag representing the section we need the name from.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/html.el.gz
(defun semantic-html-extract-section-name ()
  "Extract a section name from the current buffer and point.
Assume the cursor is in the tag representing the section we
need the name from."
  (save-excursion
    ; Skip over the HTML tag.
    (forward-sexp -1)
    (forward-char -1)
    (forward-sexp 1)
    (skip-chars-forward "\n\t ")
    (while (looking-at "<")
      (forward-sexp 1)
      (skip-chars-forward "\n\t ")
      )
    (let ((start (point))
	  (end nil))
      (if (re-search-forward "</" nil t)
	  (progn
	    (goto-char (match-beginning 0))
	    (skip-chars-backward " \n\t")
	    (setq end (point))
	    (buffer-substring-no-properties start end))
	""))
    ))