(archive-mode): Use run-mode-hooks.

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index e72d38f3a3f0e20f7a5f4cde2dbc11b27919b7d9..13f4559cfaf2e806f9f514ba7146194468e965c7 100644 (file)
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -672,7 +672,7 @@ archive.
        (setq major-mode 'archive-mode)
        (setq mode-name (concat typename "-Archive"))
        ;; Run archive-foo-mode-hook and archive-mode-hook
-       (run-hooks (archive-name "mode-hook") 'archive-mode-hook)
+       (run-mode-hooks (archive-name "mode-hook") 'archive-mode-hook)
        (use-local-map archive-mode-map))
 
       (make-local-variable 'archive-proper-file-start)