X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator.pm;h=0a0808ae1b71494496707f9039227bccb3a04824;hb=478f608d9028508396da37bb5df10b3057b96981;hp=5d20d78b1125dc466529104094b43a3bf24e26f7;hpb=d3888c8105d9d8b28f7027bbb96b65b9e5c72420;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator.pm b/lib/SQL/Translator.pm index 5d20d78..0a0808a 100644 --- a/lib/SQL/Translator.pm +++ b/lib/SQL/Translator.pm @@ -3,7 +3,7 @@ package SQL::Translator; # ---------------------------------------------------------------------- # $Id$ # ---------------------------------------------------------------------- -# Copyright (C) 2002-4 The SQLFairy Authors +# Copyright (C) 2002-2009 The 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 @@ -21,13 +21,12 @@ package SQL::Translator; # ------------------------------------------------------------------- use strict; -use vars qw( $VERSION $REVISION $DEFAULT_SUB $DEBUG $ERROR ); +use vars qw( $VERSION $DEFAULT_SUB $DEBUG $ERROR ); use base 'Class::Base'; require 5.004; $VERSION = '0.09002'; -$REVISION = sprintf "%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/; $DEBUG = 0 unless defined $DEBUG; $ERROR = "";