X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer.pm;h=ac6d5bdee9a244bc85e8f4d149dda5b8e50a5bd4;hb=7a16a53e0db93fa50cd41e92afc53d82a90131eb;hp=8680f42e02a99417d1ed59ba93f43a5f1fec90b8;hpb=935800450f88b0500c4fa7c3b174cd22b5f9eb56;p=dbsrgits%2FSQL-Translator.git

diff --git a/lib/SQL/Translator/Producer.pm b/lib/SQL/Translator/Producer.pm
index 8680f42..ac6d5bd 100644
--- a/lib/SQL/Translator/Producer.pm
+++ b/lib/SQL/Translator/Producer.pm
@@ -1,9 +1,9 @@
 package SQL::Translator::Producer;
 
 use strict;
-use vars qw($VERSION);
+use warnings;
 use Scalar::Util ();
-$VERSION = '1.59';
+our $VERSION = '1.59';
 
 sub produce { "" }
 
@@ -63,8 +63,8 @@ SQL::Translator::Producer - describes how to write a producer
 
 Producer modules designed to be used with SQL::Translator need to
 implement a single function, called B<produce>.  B<produce> will be
-called with the SQL::Translator object from which it is expected to 
-retrieve the SQL::Translator::Schema object which has been populated 
+called with the SQL::Translator object from which it is expected to
+retrieve the SQL::Translator::Schema object which has been populated
 by the parser.  It is expected to return a string.
 
 =head1 METHODS