Mercurial > emacs
comparison lisp/progmodes/cperl-mode.el @ 78660:ccfc1f1f4817
* progmodes/cperl-mode.el (cperl-indent-level): Autoload the
safe-local-variable setting.
* progmodes/perl-mode.el (perl-indent-level): Likewise.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Sat, 25 Aug 2007 21:29:48 +0000 |
parents | 5c8d5235a4ac |
children | c727abfbb05e 92ccd83174e6 |
comparison
equal
deleted
inserted
replaced
78659:01a61e30fa32 | 78660:ccfc1f1f4817 |
---|---|
231 | 231 |
232 (defcustom cperl-indent-level 2 | 232 (defcustom cperl-indent-level 2 |
233 "*Indentation of CPerl statements with respect to containing block." | 233 "*Indentation of CPerl statements with respect to containing block." |
234 :type 'integer | 234 :type 'integer |
235 :group 'cperl-indentation-details) | 235 :group 'cperl-indentation-details) |
236 (put 'cperl-indent-level 'safe-local-variable 'integerp) | 236 |
237 ;; Is is not unusual to put both perl-indent-level and | |
238 ;; cperl-indent-level in the local variable section of a file. If only | |
239 ;; one of perl-mode and cperl-mode is in use, a warning will be issued | |
240 ;; about the variable. Autoload this here, so that no warning is | |
241 ;; issued when using either perl-mode or cperl-mode. | |
242 ;;;###autoload(put 'cperl-indent-level 'safe-local-variable 'integerp) | |
237 | 243 |
238 (defcustom cperl-lineup-step nil | 244 (defcustom cperl-lineup-step nil |
239 "*`cperl-lineup' will always lineup at multiple of this number. | 245 "*`cperl-lineup' will always lineup at multiple of this number. |
240 If nil, the value of `cperl-indent-level' will be used." | 246 If nil, the value of `cperl-indent-level' will be used." |
241 :type '(choice (const nil) integer) | 247 :type '(choice (const nil) integer) |