X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FClassDBI.pm;h=4a93011641503c1d6c135d2a0f9157f4126d103e;hb=d4f84dd192edc7a64a0b1a9923f1bafc0bc5ef9d;hp=9c008820d842b038315d48490169fcee260ebe65;hpb=821a0fde221f5accf93e3f65efa77b5a6733cb5e;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Producer/ClassDBI.pm b/lib/SQL/Translator/Producer/ClassDBI.pm index 9c00882..4a93011 100755 --- a/lib/SQL/Translator/Producer/ClassDBI.pm +++ b/lib/SQL/Translator/Producer/ClassDBI.pm @@ -1,9 +1,9 @@ package SQL::Translator::Producer::ClassDBI; # ------------------------------------------------------------------- -# $Id$ +# $Id: ClassDBI.pm 1440 2009-01-17 16:31:57Z jawnsy $ # ------------------------------------------------------------------- -# Copyright (C) 2002-4 SQLFairy Authors +# 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 @@ -21,8 +21,7 @@ package SQL::Translator::Producer::ClassDBI; # ------------------------------------------------------------------- use strict; -use vars qw[ $VERSION $DEBUG ]; -$VERSION = sprintf "%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/; +use vars qw[ $DEBUG ]; $DEBUG = 1 unless defined $DEBUG; use SQL::Translator::Schema::Constants;