X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FTT%2FBase.pm;h=9c86f86e57db59bf45693db980bc7190c5a669d2;hb=0c04c5a2210135419771878dc7e341a1cba52cca;hp=50f1d0503451cb1bd05c015c6763f604ddf8e0e2;hpb=935800450f88b0500c4fa7c3b174cd22b5f9eb56;p=dbsrgits%2FSQL-Translator.git

diff --git a/lib/SQL/Translator/Producer/TT/Base.pm b/lib/SQL/Translator/Producer/TT/Base.pm
index 50f1d05..9c86f86 100644
--- a/lib/SQL/Translator/Producer/TT/Base.pm
+++ b/lib/SQL/Translator/Producer/TT/Base.pm
@@ -10,9 +10,10 @@ class.
 =cut
 
 use strict;
+use warnings;
 
-use vars qw[ $VERSION @EXPORT_OK ];
-$VERSION = '1.59';
+our @EXPORT_OK;
+our $VERSION = '1.59';
 
 use Template;
 use Data::Dumper;
@@ -131,8 +132,6 @@ sub tt_vars   { () };
 
 1;
 
-# -------------------------------------------------------------------
-
 =pod
 
 =head1 SYNOPSIS
@@ -244,7 +243,7 @@ The L<SQL::Translator> object.
 WARNING: This method is Experimental so may change!
 
 Called with the L<SQL::Translator::Schema> object and should return one (it
-doesn't have to be the same one) that will become the C<schema> varibale used 
+doesn't have to be the same one) that will become the C<schema> varibale used
 in the template.
 
 Gets called from tt_default_vars.