X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FTT%2FBase.pm;h=3a6105cc5d6f7e0b68ea126c3b813683df464b46;hb=ac7adbab6451299d70b5ecc59c6bb7f8a6f9473b;hp=86a63e865416b3c51d98d8a8ca84305c2e2ca85a;hpb=d4f84dd192edc7a64a0b1a9923f1bafc0bc5ef9d;p=dbsrgits%2FSQL-Translator.git

diff --git a/lib/SQL/Translator/Producer/TT/Base.pm b/lib/SQL/Translator/Producer/TT/Base.pm
index 86a63e8..3a6105c 100644
--- a/lib/SQL/Translator/Producer/TT/Base.pm
+++ b/lib/SQL/Translator/Producer/TT/Base.pm
@@ -1,25 +1,5 @@
 package SQL::Translator::Producer::TT::Base;
 
-# -------------------------------------------------------------------
-# $Id: Base.pm 1440 2009-01-17 16:31:57Z jawnsy $
-# -------------------------------------------------------------------
-# Copyright (C) 2002-2009 SQLFairy Authors
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of the GNU General Public License as
-# published by the Free Software Foundation; version 2.
-#
-# This program is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-# 02111-1307  USA
-# -------------------------------------------------------------------
-
 =pod
 
 =head1 NAME
@@ -30,8 +10,10 @@ class.
 =cut
 
 use strict;
+use warnings;
 
-use vars qw[ @EXPORT_OK ];
+our @EXPORT_OK;
+our $VERSION = '1.59';
 
 use Template;
 use Data::Dumper;
@@ -150,8 +132,6 @@ sub tt_vars   { () };
 
 1;
 
-# -------------------------------------------------------------------
-
 =pod
 
 =head1 SYNOPSIS
@@ -194,14 +174,14 @@ sub classes.
  # Convert produce call into an object method call
  sub produce { return __PACKAGE__->new( translator => shift )->run; };
 
-See L<PRODUCER OBJECT> below for details.
+See L</PRODUCER OBJECT> below for details.
 
 The upshot of this is we can make new template producers by sub classing this
 base class, adding the above snippet and a template.
 The module also provides a number of hooks into the templating process,
-see L<SUB CLASS HOOKS> for details.
+see L</SUB CLASS HOOKS> for details.
 
-See the L<SYNOPSIS> above for an example of creating a simple producer using
+See the L</SYNOPSIS> above for an example of creating a simple producer using
 a single template stored in the producers DATA section.
 
 =head1 SUB CLASS HOOKS
@@ -225,7 +205,7 @@ The template to use, return a file name or a scalar ref of TT
 source, or an L<IO::Handle>. See L<Template> for details, as the return from
 this is passed on to it's C<produce> method.
 
-The default implimentation uses the producer arg C<ttfile> as a filename to read
+The default implementation uses the producer arg C<ttfile> as a filename to read
 the template from. If the arg isn't there it will look for a C<__DATA__> section
 in the class, reading it as template source if found. Returns undef if both
 these fail, causing the produce call to fail with a 'no template!' error.
@@ -235,13 +215,13 @@ these fail, causing the produce call to fail with a 'no template!' error.
  sub tt_vars { ( foo => "bar" ); }
 
 Return hash of template vars to use in the template. Nothing added here
-by default, but see L<tt_default_vars> for the variables you get for free.
+by default, but see L</tt_default_vars> for the variables you get for free.
 
 =head2 tt_default_vars
 
 Return a hash-ref of the default vars given to the template.
-You wouldn't normally over-ride this, just inherit the default implimentation,
-to get the C<translator> & C<schema> variables, then over-ride L<tt_vars> to add
+You wouldn't normally over-ride this, just inherit the default implementation,
+to get the C<translator> & C<schema> variables, then over-ride L</tt_vars> to add
 your own.
 
 The current default variables are:
@@ -263,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> variable used
 in the template.
 
 Gets called from tt_default_vars.
@@ -286,7 +266,7 @@ Return the L<SQL::Translator> object.
 
 =head2 schema
 
-Return the L<SQL::Translator::Schema> we are translating. This is equivilent
+Return the L<SQL::Translator::Schema> we are translating. This is equivalent
 to C<< $tt_producer->translator->schema >>.
 
 =head2 run
@@ -297,7 +277,7 @@ produced text.
 =head2 args
 
 Util wrapper method around C<< TT::Base->translator->producer_args >> for
-(mostley) readonly access to the producer args. How it works depends on the
+(mostly) readonly access to the producer args. How it works depends on the
 number of arguments you give it and the context.
 
  No args - Return hashref (the actual hash in Translator) or hash of args.
@@ -323,7 +303,7 @@ paths.
 
 - Pass in template vars from the producer args and command line.
 
-- Merge in TT::Table.
+- Merge in L<TT::Table|SQL::Translator::Producer::TT::Table>.
 
 - Hooks to pre-process the schema and post-process the output.