diff options
| author | Stefan Monnier | 2000-12-07 11:52:01 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2000-12-07 11:52:01 +0000 |
| commit | b761da871c8bf9529c5c7f5bd3785fd5527ff8ad (patch) | |
| tree | 5a115c35c510f08135577879a2d2c5bc07258c73 | |
| parent | 959e647dcff6744bab020f8005b59981ed56c18c (diff) | |
| download | emacs-b761da871c8bf9529c5c7f5bd3785fd5527ff8ad.tar.gz emacs-b761da871c8bf9529c5c7f5bd3785fd5527ff8ad.zip | |
(define-derived-mode): Don't use combine-run-hooks.
| -rw-r--r-- | lisp/derived.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/derived.el b/lisp/derived.el index b8be0c3f0d1..8dc20972787 100644 --- a/lisp/derived.el +++ b/lisp/derived.el | |||
| @@ -150,7 +150,7 @@ been generated automatically, with a reference to the keymap." | |||
| 150 | ,docstring | 150 | ,docstring |
| 151 | (interactive) | 151 | (interactive) |
| 152 | ; Run the parent. | 152 | ; Run the parent. |
| 153 | (combine-run-hooks | 153 | ;; (combine-run-hooks |
| 154 | 154 | ||
| 155 | (,parent) | 155 | (,parent) |
| 156 | ; Identify special modes. | 156 | ; Identify special modes. |
| @@ -177,7 +177,8 @@ been generated automatically, with a reference to the keymap." | |||
| 177 | (set-syntax-table ,syntax) | 177 | (set-syntax-table ,syntax) |
| 178 | (setq local-abbrev-table ,abbrev) | 178 | (setq local-abbrev-table ,abbrev) |
| 179 | ; Splice in the body (if any). | 179 | ; Splice in the body (if any). |
| 180 | ,@body) | 180 | ,@body |
| 181 | ;; ) | ||
| 181 | ; Run the hooks, if any. | 182 | ; Run the hooks, if any. |
| 182 | (run-hooks ',hook))))) | 183 | (run-hooks ',hook))))) |
| 183 | 184 | ||