From d74fa98c012bb90aa499cf4ce3ed9ed2fe789814 Mon Sep 17 00:00:00 2001 From: Lute Kamstra Date: Thu, 26 May 2005 13:30:23 +0000 Subject: [PATCH] (calc-mode, calc-trail-mode): Use run-mode-hooks. --- lisp/calc/calc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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*")) -- 2.39.2