Function: semantic-format-tag-uml-protection-to-string-default
semantic-format-tag-uml-protection-to-string-default is a
byte-compiled function defined in format.el.gz.
Signature
(semantic-format-tag-uml-protection-to-string-default PROTECTION-SYMBOL COLOR)
Documentation
Convert PROTECTION-SYMBOL to a string for UML.
Uses semantic-format-tag-protection-symbol-to-string-assoc-list to convert.
If PROTECTION-SYMBOL is unknown, then the return value is
semantic-uml-no-protection-string.
COLOR indicates if we should use an image on the text.
Source Code
;; Defined in /usr/src/emacs/lisp/cedet/semantic/format.el.gz
(defun semantic-format-tag-uml-protection-to-string-default (protection-symbol color)
"Convert PROTECTION-SYMBOL to a string for UML.
Uses `semantic-format-tag-protection-symbol-to-string-assoc-list' to convert.
If PROTECTION-SYMBOL is unknown, then the return value is
`semantic-uml-no-protection-string'.
COLOR indicates if we should use an image on the text."
(let* ((ezimage-use-images (and semantic-format-use-images-flag color))
(key (assoc protection-symbol
semantic-format-tag-protection-symbol-to-string-assoc-list))
(str (or (cdr-safe key) semantic-uml-no-protection-string)))
(ezimage-image-over-string
(copy-sequence str) ; make a copy to keep the original pristine.
semantic-format-tag-protection-image-alist)))