From: Lute Kamstra <lute@gnu.org>
Date: Thu, 26 May 2005 13:30:23 +0000 (+0000)
Subject: (calc-mode, calc-trail-mode): Use run-mode-hooks.
X-Git-Tag: emacs-pretest-22.0.90~9539
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d74fa98c012bb90aa499cf4ce3ed9ed2fe789814;p=emacs.git

(calc-mode, calc-trail-mode): Use run-mode-hooks.
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 173785dc912..27623907d45 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1131,7 +1131,7 @@ Notations:  3.14e6     3.14 * 10^6
 	   (string-match "full" (nth 1 p))
 	   (setq calc-standalone-flag t))
       (setq p (cdr p))))
-  (run-hooks 'calc-mode-hook)
+  (run-mode-hooks 'calc-mode-hook)
   (calc-refresh t)
   (calc-set-mode-line)
   (calc-check-defines))
@@ -1181,7 +1181,7 @@ commands given here will actually operate on the *Calculator* stack."
       (insert (propertize (concat "Emacs Calculator v" calc-version
 				  " by Dave Gillespie\n")
 			  'font-lock-face 'italic))))
-  (run-hooks 'calc-trail-mode-hook))
+  (run-mode-hooks 'calc-trail-mode-hook))
 
 (defun calc-create-buffer ()
   (set-buffer (get-buffer-create "*Calculator*"))