diff options
| author | Richard M. Stallman | 2003-07-21 09:58:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-07-21 09:58:06 +0000 |
| commit | fb16e9326788b239a5d51adff4d2f99be9e80a56 (patch) | |
| tree | cb0f50f24e0acbd3c8d752a3883aa0b1ca9d206c | |
| parent | 4df623c0738b6a333dae9e170376f62f426b9d25 (diff) | |
| download | emacs-fb16e9326788b239a5d51adff4d2f99be9e80a56.tar.gz emacs-fb16e9326788b239a5d51adff4d2f99be9e80a56.zip | |
(emacs-lisp-mode): Use run-mode-hooks.
(lisp-mode): Likewise.
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index ca4e7f10a68..fa9661f54a5 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el | |||
| @@ -320,7 +320,7 @@ if that value is non-nil." | |||
| 320 | (setq mode-name "Emacs-Lisp") | 320 | (setq mode-name "Emacs-Lisp") |
| 321 | (lisp-mode-variables) | 321 | (lisp-mode-variables) |
| 322 | (setq imenu-case-fold-search nil) | 322 | (setq imenu-case-fold-search nil) |
| 323 | (run-hooks 'emacs-lisp-mode-hook)) | 323 | (run-mode-hooks 'emacs-lisp-mode-hook)) |
| 324 | (put 'emacs-lisp-mode 'custom-mode-group 'lisp) | 324 | (put 'emacs-lisp-mode 'custom-mode-group 'lisp) |
| 325 | 325 | ||
| 326 | (defvar lisp-mode-map | 326 | (defvar lisp-mode-map |
| @@ -356,7 +356,7 @@ if that value is non-nil." | |||
| 356 | (setq font-lock-keywords-case-fold-search t) | 356 | (setq font-lock-keywords-case-fold-search t) |
| 357 | (setq imenu-case-fold-search t) | 357 | (setq imenu-case-fold-search t) |
| 358 | (set-syntax-table lisp-mode-syntax-table) | 358 | (set-syntax-table lisp-mode-syntax-table) |
| 359 | (run-hooks 'lisp-mode-hook)) | 359 | (run-mode-hooks 'lisp-mode-hook)) |
| 360 | 360 | ||
| 361 | ;; This will do unless inf-lisp.el is loaded. | 361 | ;; This will do unless inf-lisp.el is loaded. |
| 362 | (defun lisp-eval-defun (&optional and-go) | 362 | (defun lisp-eval-defun (&optional and-go) |