# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1186506044 0
# Node ID ab02dcd8b2b4774c35fac06f7866fd0c76947cf9
# Parent  46fd08fd44f3a61c01fb911ef73b0eeb646a596d
(tcl-indent-level, tcl-continued-indent-level): Add safe-local-variable prop.

diff -r 46fd08fd44f3 -r ab02dcd8b2b4 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Aug 07 16:47:29 2007 +0000
+++ b/lisp/ChangeLog	Tue Aug 07 17:00:44 2007 +0000
@@ -1,3 +1,8 @@
+2007-08-07  Tom Tromey  <tromey@redhat.com>
+
+	* progmodes/tcl.el (tcl-indent-level, tcl-continued-indent-level):
+	Add safe-local-variable property.
+
 2007-08-07  Chong Yidong  <cyd@stupidchicken.com>
 
 	* image-mode.el (image-toggle-display): Use image-refresh.
diff -r 46fd08fd44f3 -r ab02dcd8b2b4 lisp/progmodes/tcl.el
--- a/lisp/progmodes/tcl.el	Tue Aug 07 16:47:29 2007 +0000
+++ b/lisp/progmodes/tcl.el	Tue Aug 07 17:00:44 2007 +0000
@@ -126,11 +126,13 @@
   "*Indentation of Tcl statements with respect to containing block."
   :type 'integer
   :group 'tcl)
+(put 'tcl-indent-level 'safe-local-variable 'integerp)
 
 (defcustom tcl-continued-indent-level 4
   "*Indentation of continuation line relative to first line of command."
   :type 'integer
   :group 'tcl)
+(put 'tcl-continued-indent-level 'safe-local-variable 'integerp)
 
 (defcustom tcl-auto-newline nil
   "*Non-nil means automatically newline before and after braces you insert."