aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2000-12-07 11:52:01 +0000
committerStefan Monnier2000-12-07 11:52:01 +0000
commitb761da871c8bf9529c5c7f5bd3785fd5527ff8ad (patch)
tree5a115c35c510f08135577879a2d2c5bc07258c73
parent959e647dcff6744bab020f8005b59981ed56c18c (diff)
downloademacs-b761da871c8bf9529c5c7f5bd3785fd5527ff8ad.tar.gz
emacs-b761da871c8bf9529c5c7f5bd3785fd5527ff8ad.zip
(define-derived-mode): Don't use combine-run-hooks.
-rw-r--r--lisp/derived.el5
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