Function: mh-folder-speedbar-buttons
mh-folder-speedbar-buttons is an autoloaded and byte-compiled function
defined in mh-speed.el.gz.
Signature
(mh-folder-speedbar-buttons BUFFER)
Documentation
Interface function to create MH-E speedbar buffer.
BUFFER is the MH-E buffer for which the speedbar buffer is to be created.
Aliases
mh-letter-speedbar-buttons
mh-show-speedbar-buttons
Source Code
;; Defined in /usr/src/emacs/lisp/mh-e/mh-speed.el.gz
;;; Support Routines
;;;###mh-autoload
(defun mh-folder-speedbar-buttons (_buffer)
"Interface function to create MH-E speedbar buffer.
BUFFER is the MH-E buffer for which the speedbar buffer is to be
created."
(unless (get-text-property (point-min) 'mh-level)
(erase-buffer)
(clrhash mh-speed-folder-map)
(speedbar-make-tag-line 'bracket ?+ 'mh-speed-toggle nil " " 'ignore nil
'mh-speedbar-folder 0)
(forward-line -1)
(setf (gethash nil mh-speed-folder-map)
(set-marker (or (gethash nil mh-speed-folder-map) (make-marker))
(1+ (line-beginning-position))))
(add-text-properties
(line-beginning-position) (1+ (line-beginning-position))
'(mh-folder nil mh-expanded nil mh-children-p t mh-level 0))
(mh-speed-stealth-update t)
(when (> mh-speed-update-interval 0)
(mh-speed-flists nil))))