# HG changeset patch
# User Daniel Pfeiffer <occitan@esperanto.org>
# Date 1100303250 0
# Node ID 71f3f7fc6fcd5f9d12726e31aca2fb661e0e4dfa
# Parent  9817ad6b6fe4de1bd904d98277d830d9b13e00f6
run-mode-hooks instead of run-hooks

diff -r 9817ad6b6fe4 -r 71f3f7fc6fcd lisp/progmodes/cperl-mode.el
--- a/lisp/progmodes/cperl-mode.el	Fri Nov 12 22:35:21 2004 +0000
+++ b/lisp/progmodes/cperl-mode.el	Fri Nov 12 23:47:30 2004 +0000
@@ -1544,7 +1544,7 @@
        (cperl-msb-fix))
   (if (featurep 'easymenu)
       (easy-menu-add cperl-menu))	; A NOP in Emacs.
-  (run-hooks 'cperl-mode-hook)
+  (run-mode-hooks 'cperl-mode-hook)
   ;; After hooks since fontification will break this
   (if cperl-pod-here-scan
       (or cperl-syntaxify-by-font-lock