Function: eieio-speedbar-object-expand
eieio-speedbar-object-expand is a byte-compiled function defined in
eieio-speedbar.el.gz.
Signature
(eieio-speedbar-object-expand TEXT TOKEN INDENT)
Documentation
Expand object represented by TEXT.
TOKEN is the object. INDENT is the current indentation level.
Source Code
;; Defined in /usr/src/emacs/lisp/emacs-lisp/eieio-speedbar.el.gz
(defun eieio-speedbar-object-expand (text token indent)
"Expand object represented by TEXT.
TOKEN is the object. INDENT is the current indentation level."
(cond ((string-search "+" text) ;we have to expand this file
(speedbar-change-expand-button-char ?-)
(oset token expanded t)
(speedbar-with-writable
(save-excursion
(end-of-line) (forward-char 1)
(eieio-speedbar-expand token (1+ indent)))))
((string-search "-" text) ;we have to contract this node
(speedbar-change-expand-button-char ?+)
(oset token expanded nil)
(speedbar-delete-subblock indent))
(t (error "Ooops... not sure what to do")))
(speedbar-center-buffer-smartly))