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 |