Lines Matching +defs:default +defs:map
98 ;; If you wish to add to the default speedbar menu for the case of
103 ;; variable `foo-speedbar-key-map'. Instead of using `make-keymap',
106 ;; speedbar's default bindings with low overhead.
178 '(("buffers" speedbar-buffer-easymenu-definition speedbar-buffers-key-map
180 ("quick buffers" speedbar-buffer-easymenu-definition speedbar-buffers-key-map
183 ("files" speedbar-easymenu-definition-special speedbar-file-key-map
184 speedbar-directory-buttons speedbar-default-directory-list)
193 called in order. These functions will always get the default
276 (defvar speedbar-special-mode-key-map nil
283 The default buffer is the buffer in the selected window in the attached frame."
294 The default buffer is the buffer in the selected window in the attached frame."
356 default-toolbar-visible-p nil has-modeline-p nil
358 default-gutter-visible-p nil
371 XEmacs prior to 20.4 doesn't support imenu, therefore the default is to
402 (defcustom speedbar-default-position 'left-right
690 ;; html is not supported by default, but an imenu tags package
759 \\<speedbar-key-map> `\\[speedbar-toggle-updates]'
782 (defvar speedbar-key-map nil
785 (if speedbar-key-map
787 (setq speedbar-key-map (make-keymap))
788 (suppress-keymap speedbar-key-map t)
791 (define-key speedbar-key-map "t" 'speedbar-toggle-updates)
792 (define-key speedbar-key-map "g" 'speedbar-refresh)
795 (define-key speedbar-key-map "n" 'speedbar-next)
796 (define-key speedbar-key-map "p" 'speedbar-prev)
797 (define-key speedbar-key-map "\M-n" 'speedbar-restricted-next)
798 (define-key speedbar-key-map "\M-p" 'speedbar-restricted-prev)
799 (define-key speedbar-key-map "\C-\M-n" 'speedbar-forward-list)
800 (define-key speedbar-key-map "\C-\M-p" 'speedbar-backward-list)
802 ;; (define-key speedbar-key-map " " 'speedbar-scroll-up)
803 ;; (define-key speedbar-key-map [delete] 'speedbar-scroll-down)
806 (define-key speedbar-key-map "r"
810 (define-key speedbar-key-map "b"
813 (define-key speedbar-key-map "f"
817 (dframe-update-keymap speedbar-key-map)
823 `speedbar-key-map'."
825 (set-keymap-parent k speedbar-key-map)
828 (defvar speedbar-file-key-map nil
831 (if speedbar-file-key-map
833 (setq speedbar-file-key-map (speedbar-make-specialized-keymap))
836 (define-key speedbar-file-key-map "e" 'speedbar-edit-line)
837 (define-key speedbar-file-key-map "\C-m" 'speedbar-edit-line)
838 (define-key speedbar-file-key-map "+" 'speedbar-expand-line)
839 (define-key speedbar-file-key-map "=" 'speedbar-expand-line)
840 (define-key speedbar-file-key-map "-" 'speedbar-contract-line)
842 (define-key speedbar-file-key-map "[" 'speedbar-expand-line-descendants)
843 (define-key speedbar-file-key-map "]" 'speedbar-contract-line-descendants)
845 (define-key speedbar-file-key-map " " 'speedbar-toggle-line-expansion)
848 (define-key speedbar-file-key-map "U" 'speedbar-up-directory)
849 (define-key speedbar-file-key-map "I" 'speedbar-item-info)
850 (define-key speedbar-file-key-map "B" 'speedbar-item-byte-compile)
851 (define-key speedbar-file-key-map "L" 'speedbar-item-load)
852 (define-key speedbar-file-key-map "C" 'speedbar-item-copy)
853 (define-key speedbar-file-key-map "D" 'speedbar-item-delete)
854 (define-key speedbar-file-key-map "O" 'speedbar-item-object-delete)
855 (define-key speedbar-file-key-map "R" 'speedbar-item-rename)
856 (define-key speedbar-file-key-map "M" 'speedbar-create-directory)
1048 speedbar-default-position))))
1081 \\<speedbar-key-map>
1082 The first line represents the default directory of the speedbar frame.
1083 Each directory segment is a button which jumps speedbar's default
1091 directory as the default.
1118 \\{speedbar-key-map}"
1242 'speedbar-special-mode-key-map
1244 speedbar-special-mode-key-map)
1248 (use-local-map (or localmap
1258 (easy-menu-define speedbar-menu-map (current-local-map)
1260 (easy-menu-add md (current-local-map))
1404 "Keyboard accelerator for moving the default directory up one.
1407 (setq default-directory (expand-file-name (concat default-directory "../")))
1783 "Return the current default expansion list.
1791 "Return the current default menu data.
1799 "Return the current default menu data.
1817 (defun speedbar-change-initial-expansion-list (new-default)
1818 "Change speedbar's default expansion list to NEW-DEFAULT."
1821 (completing-read (format "Speedbar Mode (default %s): "
1828 speedbar-initial-expansion-list-name new-default)
1882 (setq v (intern-soft (concat ms "-speedbar-key-map")))
1885 (make-local-variable 'speedbar-special-mode-key-map)
1886 (setq speedbar-special-mode-key-map
1901 (kill-local-variable 'speedbar-special-mode-key-map)
1920 (let ((default-directory directory)
2109 (defun speedbar-default-directory-list (directory index)
2121 (list (expand-file-name default-directory)))
2504 (if (or (member (expand-file-name default-directory)
2509 (expand-file-name default-directory))))
2513 default-directory))
2518 default-directory)
2521 (let ((cbd (expand-file-name default-directory)))
2529 (setq default-directory cbd)
2537 (let ((cbd (expand-file-name default-directory))
2587 ;; default the shown directories to this list...
2602 (setq default-directory
2608 (setq default-directory cbd)
2817 (expand-file-name default-directory)))
2924 (speedbar-vc-check-dir-p default-directory)
2931 (expand-file-name default-directory)))
2939 (expand-file-name default-directory))))))
3192 (length (expand-file-name default-directory))))
3228 This may require traversing backwards from DEPTH and combining the default
3234 (if rf (funcall rf depth) default-directory))))
3238 This may require traversing backwards from DEPTH and combining the default
3264 (concat default-directory directory)))))
3373 ;; hidden by default anyway. Yay! It's easy.
3401 (setq default-directory
3443 (speedbar-default-directory-list
3465 "Speedbar click handler for default directory buttons.
3469 (setq default-directory (concat token "/"))
3470 (setq default-directory token))
3866 (defvar speedbar-buffers-key-map nil
3869 (if speedbar-buffers-key-map
3871 (setq speedbar-buffers-key-map (speedbar-make-specialized-keymap))
3874 (define-key speedbar-buffers-key-map "e" 'speedbar-edit-line)
3875 (define-key speedbar-buffers-key-map "\C-m" 'speedbar-edit-line)
3876 (define-key speedbar-buffers-key-map "+" 'speedbar-expand-line)
3877 (define-key speedbar-buffers-key-map "=" 'speedbar-expand-line)
3878 (define-key speedbar-buffers-key-map "-" 'speedbar-contract-line)
3879 (define-key speedbar-buffers-key-map " " 'speedbar-toggle-line-expansion)
3882 (define-key speedbar-buffers-key-map "k" 'speedbar-buffer-kill-buffer)
3883 (define-key speedbar-buffers-key-map "r" 'speedbar-buffer-revert-buffer)
4008 default-directory)