;; (setq imenu-create-index-function 'semantic-create-imenu-index)
;; ))
+;;; Code:
+
(require 'semantic)
(require 'semantic/format)
(require 'semantic/db)
By default, a `type' has interesting children. In Texinfo, however, a
`section' has interesting children.")
-;;; Code:
(defun semantic-imenu-tag-overlay (tag)
"Return the overlay belonging to tag.
If TAG doesn't have an overlay, and instead as a vector of positions,
;; buffer, there is a much more efficient way of doing this.
;; Advise `which-function' so that we optionally use semantic tags
;; instead, and get better stuff.
-(require 'advice)
-(defvar semantic-which-function 'semantic-default-which-function
+(defvar semantic-which-function #'semantic-default-which-function
"Function to convert semantic tags into `which-function' text.")
(defcustom semantic-which-function-use-color nil