Function: semantic-decorate-tag

semantic-decorate-tag is a byte-compiled function defined in mode.el.gz.

Signature

(semantic-decorate-tag TAG BEGIN END &optional FACE)

Documentation

Add a new decoration on TAG on the region between BEGIN and END.

If optional argument FACE is non-nil, set the decoration's face to FACE. Return the overlay that makes up the new decoration.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/decorate/mode.el.gz
;;; Tag decoration
;;
(defun semantic-decorate-tag (tag begin end &optional face)
  "Add a new decoration on TAG on the region between BEGIN and END.
If optional argument FACE is non-nil, set the decoration's face to
FACE.
Return the overlay that makes up the new decoration."
  (let ((deco (semantic-tag-create-secondary-overlay tag)))
    ;; We do not use the unlink property because we do not want to
    ;; save the highlighting information in the DB.
    (overlay-put deco 'semantic-decoration t)
    (semantic-decoration-move deco begin end)
    (semantic-decoration-set-face deco face)
    deco))