Commit 5fdd4046 authored by Chong Yidong's avatar Chong Yidong
Browse files

* lisp/progmodes/cperl-mode.el (cperl-mode): Derive from prog-mode.

parent 029529ac
2011-06-26 Chong Yidong <>
* progmodes/cperl-mode.el (cperl-mode): Derive from prog-mode.
2011-06-26 Glenn Morris <>
* progmodes/f90.el (f90-critical-indent): New option.
......@@ -1522,7 +1522,7 @@ the last)."
(defvar compilation-error-regexp-alist)
(defun cperl-mode ()
(define-derived-mode cperl-mode prog-mode "CPerl"
"Major mode for editing Perl code.
Expression and list commands understand all C brackets.
Tab indents for Perl code.
......@@ -1695,9 +1695,6 @@ with no args.
DO NOT FORGET to read micro-docs (available from `Perl' menu)
or as help on variables `cperl-tips', `cperl-problems',
`cperl-praise', `cperl-speed'."
(use-local-map cperl-mode-map)
(if (cperl-val 'cperl-electric-linefeed)
(local-set-key "\C-J" 'cperl-linefeed)
......@@ -1710,8 +1707,6 @@ or as help on variables `cperl-tips', `cperl-problems',
(cperl-define-key "\C-hf" 'cperl-info-on-current-command [(control h) f])
(cperl-define-key "\C-c\C-hf" 'cperl-info-on-command
[(control c) (control h) f])))
(setq major-mode cperl-use-major-mode)
(setq mode-name "CPerl")
(let ((prev-a-c abbrevs-changed))
(define-abbrev-table 'cperl-mode-abbrev-table '(
("if" "if" cperl-electric-keyword 0)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment