Function: semantic-default-which-function

semantic-default-which-function is a byte-compiled function defined in imenu.el.gz.

Signature

(semantic-default-which-function TAGLIST)

Documentation

Convert TAGLIST into a string usable by which-function.

Returns the first tag name in the list, unless it is a type, in which case it concatenates them together.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/imenu.el.gz
(defun semantic-default-which-function (taglist)
  "Convert TAGLIST into a string usable by `which-function'.
Returns the first tag name in the list, unless it is a type,
in which case it concatenates them together."
  (cond ((eq (length taglist) 1)
	 (semantic-format-tag-abbreviate
          (car taglist) nil semantic-which-function-use-color))
	((memq (semantic-tag-class (car taglist))
               semantic-imenu-expandable-tag-classes)
	 (concat (semantic-format-tag-name
                  (car taglist) nil semantic-which-function-use-color)
		 (car semantic-type-relation-separator-character)
		 ;; recurse until we no longer have a type
		 ;; or any tags left.
		 (semantic-default-which-function (cdr taglist))))
	(t (semantic-format-tag-abbreviate
            (car taglist) nil semantic-which-function-use-color))))