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 | 46120863049c0c3da994a8a0adab2fae2fcff3f5 (patch) | |
tree | e419746f38b35ff92f3187ced9525f2f524b553c /lisp/dired-x.el | |
parent | e7512d21c6c22e25d56bbc487215ab62ff71263d (diff) | |
download | emacs-46120863049c0c3da994a8a0adab2fae2fcff3f5.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)))) |