diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-04-20 16:21:55 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-04-20 16:21:55 +0000 |
| commit | e2439696ea341c3b7cf0337ae7190e817cf3451f (patch) | |
| tree | 831a4fa8d778a577ab9b3dabe9d0f69045ef7fc2 /lisp/dired-x.el | |
| parent | 873828203c80c68d57c2b7014e4f0caf8dde23ba (diff) | |
| download | emacs-e2439696ea341c3b7cf0337ae7190e817cf3451f.tar.gz | |
Change the instructions in the INSTALLATION
comment block to set buffer-local variables like
dired-omit-files-p in dired-mode-hook.
(dired-omit-files-p): Make local to all buffers.
(dired-omit-files): Fix doc string (not buffer-local).
(dired-omit-startup): Don't need to make dired-omit-files-p
local to buffer here.
Diffstat (limited to 'lisp/dired-x.el')
| -rw-r--r-- | lisp/dired-x.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 876b040f2ca..c8aaf780fef 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -43,8 +43,12 @@ ;;; (add-hook 'dired-load-hook ;;; (function (lambda () ;;; (load "dired-x") -;;; ;; Set variables here. For example: +;;; ;; Set global variables here. For example: ;;; ;; (setq dired-guess-shell-gnutar "gtar") +;;; ))) +;;; (add-hook 'dired-mode-hook +;;; (function (lambda () +;;; ;; Set buffer-local variables here. For example: ;;; ;; (setq dired-omit-files-p t) ;;; ))) ;;; @@ -155,9 +159,10 @@ Read-only folders only work in VM 5, not in VM 4.") Use \\[dired-omit-toggle] to toggle its value. Uninteresting files are those whose filenames match regexp `dired-omit-files', plus those ending with extensions in `dired-omit-extensions'.") +(make-variable-buffer-local 'dired-omit-files-p) (defvar dired-omit-files "^#\\|^\\.$\\|^\\.\\.$" - "*Filenames matching this regexp will not be displayed \(buffer-local\). + "*Filenames matching this regexp will not be displayed. This only has effect when `dired-omit-files-p' is t. See interactive function `dired-omit-toggle' \(\\[dired-omit-toggle]\) and variable `dired-omit-extensions'. The default is to omit `.', `..', and auto-save @@ -528,7 +533,6 @@ whole pathname.") Should never be used as marker by the user or other packages.") (defun dired-omit-startup () - (make-local-variable 'dired-omit-files-p) (or (assq 'dired-omit-files-p minor-mode-alist) (setq minor-mode-alist (append '((dired-omit-files-p " Omit")) minor-mode-alist)))) |