From: Darren Chamberlain Date: Thu, 26 Jun 2003 14:29:47 +0000 (+0000) Subject: Added "use Class::Base;" declaration to go with use base statement. X-Git-Tag: v0.04~386 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0ffa05074145b5313c40c0cf5e13d075a93ee9d1;p=dbsrgits%2FSQL-Translator.git Added "use Class::Base;" declaration to go with use base statement. --- diff --git a/lib/SQL/Translator.pm b/lib/SQL/Translator.pm index b208676..1779506 100644 --- a/lib/SQL/Translator.pm +++ b/lib/SQL/Translator.pm @@ -1,7 +1,7 @@ package SQL::Translator; # ---------------------------------------------------------------------- -# $Id: Translator.pm,v 1.34 2003-06-25 19:15:19 kycl4rk Exp $ +# $Id: Translator.pm,v 1.35 2003-06-26 14:29:47 dlc Exp $ # ---------------------------------------------------------------------- # Copyright (C) 2003 Ken Y. Clark , # darren chamberlain , @@ -27,12 +27,13 @@ use vars qw( $VERSION $REVISION $DEFAULT_SUB $DEBUG $ERROR ); use base 'Class::Base'; $VERSION = '0.02'; -$REVISION = sprintf "%d.%02d", q$Revision: 1.34 $ =~ /(\d+)\.(\d+)/; +$REVISION = sprintf "%d.%02d", q$Revision: 1.35 $ =~ /(\d+)\.(\d+)/; $DEBUG = 0 unless defined $DEBUG; $ERROR = ""; use Carp qw(carp); +use Class::Base; use File::Spec::Functions qw(catfile); use File::Basename qw(dirname); use IO::Dir;