procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(perl-mode-hook): Defvar it.

Browse source 
(perl-mode): Use run-mode-hooks.
This commit is contained in:
Richard M. Stallman 2005-03-18 00:13:40 +00:00
parent 8510cb9473
commit 8eac6e91e4
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/progmodes/perl-mode.el
View file

@ -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