Function: speedbar-dir-follow
speedbar-dir-follow is a byte-compiled function defined in
speedbar.el.gz.
Signature
(speedbar-dir-follow TEXT TOKEN INDENT)
Documentation
Speedbar click handler for directory names.
Clicking a directory will cause the speedbar to list files in the subdirectory TEXT. TOKEN is an unused requirement. The subdirectory chosen will be at INDENT level.
Source Code
;; Defined in /usr/src/emacs/lisp/speedbar.el.gz
(defun speedbar-dir-follow (text _token indent)
"Speedbar click handler for directory names.
Clicking a directory will cause the speedbar to list files in
the subdirectory TEXT. TOKEN is an unused requirement. The
subdirectory chosen will be at INDENT level."
(setq default-directory
(concat (expand-file-name (concat (speedbar-line-directory indent) text))
"/"))
;; Because we leave speedbar as the current buffer,
;; update contents will change directory without
;; having to touch the attached frame. Turn off smart expand just
;; in case.
(let ((speedbar-smart-directory-expand-flag nil))
(speedbar-update-contents))
(speedbar-set-timer dframe-update-speed)
(setq speedbar-last-selected-file nil)
(speedbar-stealthy-updates))