665 |
"*Regexp matching files we don't want displayed in a speedbar buffer. |
"*Regexp matching files we don't want displayed in a speedbar buffer. |
666 |
It is generated from the variable `completion-ignored-extensions'") |
It is generated from the variable `completion-ignored-extensions'") |
667 |
|
|
668 |
;; This can't be further down, since it is needed just after. |
;; Ugly compiler silencing trick. The real defvar comes later in this file. |
669 |
(defvar speedbar-file-regexp |
(defvar speedbar-file-regexp) |
|
(speedbar-extension-list-to-regex speedbar-supported-extension-expressions) |
|
|
"Regular expression matching files we know how to expand. |
|
|
Created from `speedbar-supported-extension-expression' with the |
|
|
function `speedbar-extension-list-to-regex'") |
|
670 |
|
|
671 |
;; this is dangerous to customize, because the defaults will probably |
;; this is dangerous to customize, because the defaults will probably |
672 |
;; change in the future. |
;; change in the future. |
694 |
(setq speedbar-supported-extension-expressions val |
(setq speedbar-supported-extension-expressions val |
695 |
speedbar-file-regexp (speedbar-extension-list-to-regex val)))) |
speedbar-file-regexp (speedbar-extension-list-to-regex val)))) |
696 |
|
|
697 |
|
(defvar speedbar-file-regexp |
698 |
|
(speedbar-extension-list-to-regex speedbar-supported-extension-expressions) |
699 |
|
"Regular expression matching files we know how to expand. |
700 |
|
Created from `speedbar-supported-extension-expression' with the |
701 |
|
function `speedbar-extension-list-to-regex'") |
702 |
|
|
703 |
(defcustom speedbar-scan-subdirs nil |
(defcustom speedbar-scan-subdirs nil |
704 |
"*Non-nil means speedbar will check if subdirs are empty. |
"*Non-nil means speedbar will check if subdirs are empty. |
705 |
That way you don't have to click on them to find out. But this |
That way you don't have to click on them to find out. But this |