Mercurial > emacs
comparison lisp/dired.el @ 43107:60ed6d7abdfe
(dired-load-hook, dired-mode-hook)
(dired-before-readin-hook, dired-after-readin-hook): Defcustom.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Mon, 04 Feb 2002 19:38:29 +0000 |
parents | 41928c5aed9c |
children | 0c878a7e5de7 |
comparison
equal
deleted
inserted
replaced
43106:cd4549362019 | 43107:60ed6d7abdfe |
---|---|
162 (defvaralias 'dired-free-space-program 'directory-free-space-program) | 162 (defvaralias 'dired-free-space-program 'directory-free-space-program) |
163 (defvaralias 'dired-free-space-args 'directory-free-space-args) | 163 (defvaralias 'dired-free-space-args 'directory-free-space-args) |
164 | 164 |
165 ;;; Hook variables | 165 ;;; Hook variables |
166 | 166 |
167 (defvar dired-load-hook nil | 167 (defcustom dired-load-hook nil |
168 "Run after loading dired. | 168 "Run after loading dired. |
169 You can customize key bindings or load extensions with this.") | 169 You can customize key bindings or load extensions with this." |
170 | 170 :group 'dired |
171 (defvar dired-mode-hook nil | 171 :type 'hook) |
172 "Run at the very end of dired-mode.") | 172 |
173 | 173 (defcustom dired-mode-hook nil |
174 (defvar dired-before-readin-hook nil | 174 "Run at the very end of dired-mode." |
175 "This hook is run before a dired buffer is read in (created or reverted).") | 175 :group 'dired |
176 | 176 :type 'hook) |
177 (defvar dired-after-readin-hook nil | 177 |
178 (defcustom dired-before-readin-hook nil | |
179 "This hook is run before a dired buffer is read in (created or reverted)." | |
180 :group 'dired | |
181 :type 'hook) | |
182 | |
183 (defcustom dired-after-readin-hook nil | |
178 "Hook run after each time a file or directory is read by Dired. | 184 "Hook run after each time a file or directory is read by Dired. |
179 After each listing of a file or directory, this hook is run | 185 After each listing of a file or directory, this hook is run |
180 with the buffer narrowed to the listing.") | 186 with the buffer narrowed to the listing." |
187 :group 'dired | |
188 :type 'hook) | |
181 ;; Note this can't simply be run inside function `dired-ls' as the hook | 189 ;; Note this can't simply be run inside function `dired-ls' as the hook |
182 ;; functions probably depend on the dired-subdir-alist to be OK. | 190 ;; functions probably depend on the dired-subdir-alist to be OK. |
183 | 191 |
184 ;;; Internal variables | 192 ;;; Internal variables |
185 | 193 |