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

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 173785dc912ac6595bfd51d3226103db5fdde32a..27623907d45ff5418f941a4b4550c553ddcf5f1a 100644 (file)
--- 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*"))