diff options
| author | Miles Bader <[email protected]> | 2005-03-19 02:42:17 +0000 |
|---|---|---|
| committer | Miles Bader <[email protected]> | 2005-03-19 02:42:17 +0000 |
| commit | 1bac4db5629da854a984a0e84a9469f14b6b9e76 (patch) | |
| tree | 068627144f173fed8c3331d541debae6c36f8988 /lisp/progmodes/perl-mode.el | |
| parent | f603a66a19f5bfbba314daaa21e77665b3e03dd5 (diff) | |
| parent | 951f97e67d904729032b476caf5f7c2e7e303d73 (diff) | |
Revision: [email protected]/emacs--unicode--0--patch-28
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 180-191)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 39-44)
- Merge from emacs--cvs-trunk--0
- Update from CVS
Diffstat (limited to 'lisp/progmodes/perl-mode.el')
| -rw-r--r-- | lisp/progmodes/perl-mode.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index 63848b188b..841c62f512 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el @@ -427,6 +427,9 @@ create a new comment." ((looking-at "=cut") 1) (t 3))) +(defvar perl-mode-hook nil + "Normal hook to run when entering Perl mode.") + ;;;###autoload (defun perl-mode () "Major mode for editing Perl code. @@ -519,7 +522,7 @@ Turning on Perl mode runs the normal hook `perl-mode-hook'." ;; Setup outline-minor-mode. (set (make-local-variable 'outline-regexp) perl-outline-regexp) (set (make-local-variable 'outline-level) 'perl-outline-level) - (run-hooks 'perl-mode-hook)) + (run-mode-hooks 'perl-mode-hook)) ;; This is used by indent-for-comment ;; to decide how much to indent a comment in Perl code |