# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1188077388 0
# Node ID ccfc1f1f481745d629964113d6377effd51d0414
# Parent  01a61e30fa32fd3fed1747bec44ef0e8d59a6ef2
* progmodes/cperl-mode.el (cperl-indent-level): Autoload the
safe-local-variable setting.
* progmodes/perl-mode.el (perl-indent-level): Likewise.

diff -r 01a61e30fa32 -r ccfc1f1f4817 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Aug 25 20:21:12 2007 +0000
+++ b/lisp/ChangeLog	Sat Aug 25 21:29:48 2007 +0000
@@ -1,3 +1,9 @@
+2007-08-25  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* progmodes/cperl-mode.el (cperl-indent-level): Autoload the
+	safe-local-variable setting.
+	* progmodes/perl-mode.el (perl-indent-level): Likewise.
+
 2007-08-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* uniquify.el (uniquify-rationalize-file-buffer-names): Check liveness
diff -r 01a61e30fa32 -r ccfc1f1f4817 lisp/progmodes/cperl-mode.el
--- a/lisp/progmodes/cperl-mode.el	Sat Aug 25 20:21:12 2007 +0000
+++ b/lisp/progmodes/cperl-mode.el	Sat Aug 25 21:29:48 2007 +0000
@@ -233,7 +233,13 @@
   "*Indentation of CPerl statements with respect to containing block."
   :type 'integer
   :group 'cperl-indentation-details)
-(put 'cperl-indent-level 'safe-local-variable 'integerp)
+
+;; Is is not unusual to put both perl-indent-level and
+;; cperl-indent-level in the local variable section of a file. If only
+;; one of perl-mode and cperl-mode is in use, a warning will be issued
+;; about the variable. Autoload this here, so that no warning is
+;; issued when using either perl-mode or cperl-mode.
+;;;###autoload(put 'cperl-indent-level 'safe-local-variable 'integerp)
 
 (defcustom cperl-lineup-step nil
   "*`cperl-lineup' will always lineup at multiple of this number.
diff -r 01a61e30fa32 -r ccfc1f1f4817 lisp/progmodes/perl-mode.el
--- a/lisp/progmodes/perl-mode.el	Sat Aug 25 20:21:12 2007 +0000
+++ b/lisp/progmodes/perl-mode.el	Sat Aug 25 21:29:48 2007 +0000
@@ -399,7 +399,14 @@
   "*Indentation of Perl statements with respect to containing block."
   :type 'integer
   :group 'perl)
-(put 'perl-indent-level 'safe-local-variable 'integerp)
+
+;; Is is not unusual to put both perl-indent-level and
+;; cperl-indent-level in the local variable section of a file. If only
+;; one of perl-mode and cperl-mode is in use, a warning will be issued
+;; about the variable. Autoload this here, so that no warning is
+;; issued when using either perl-mode or cperl-mode.
+;;;###autoload(put 'perl-indent-level 'safe-local-variable 'integerp)
+
 (defcustom perl-continued-statement-offset 4
   "*Extra indent for lines not starting new statements."
   :type 'integer