mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-20 18:17:20 +00:00
* lisp/progmodes/cperl-mode.el (cperl-mode): Derive from prog-mode.
This commit is contained in:
parent
029529ac6f
commit
5fdd4046b9
@ -1,3 +1,7 @@
|
||||
2011-06-26 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* progmodes/cperl-mode.el (cperl-mode): Derive from prog-mode.
|
||||
|
||||
2011-06-26 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* progmodes/f90.el (f90-critical-indent): New option.
|
||||
|
@ -1522,7 +1522,7 @@ the last)."
|
||||
(defvar compilation-error-regexp-alist)
|
||||
|
||||
;;;###autoload
|
||||
(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'."
|
||||
(interactive)
|
||||
(kill-all-local-variables)
|
||||
(use-local-map cperl-mode-map)
|
||||
(if (cperl-val 'cperl-electric-linefeed)
|
||||
(progn
|
||||
(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)
|
||||
|
Loading…
Reference in New Issue
Block a user