From: Darren Chamberlain Date: Wed, 29 Jan 2003 13:28:28 +0000 (+0000) Subject: Set $DEBUG to 0 by default. X-Git-Tag: v0.01~25 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8d0f3086649b45d56dcb4fdbaac9a9d3e2f3eeca;p=dbsrgits%2FSQL-Translator.git Set $DEBUG to 0 by default. --- diff --git a/lib/SQL/Translator/Parser/MySQL.pm b/lib/SQL/Translator/Parser/MySQL.pm index 93cdcc3..b99ff53 100644 --- a/lib/SQL/Translator/Parser/MySQL.pm +++ b/lib/SQL/Translator/Parser/MySQL.pm @@ -1,7 +1,7 @@ package SQL::Translator::Parser::MySQL; # ------------------------------------------------------------------- -# $Id: MySQL.pm,v 1.9 2003-01-27 17:04:45 dlc Exp $ +# $Id: MySQL.pm,v 1.10 2003-01-29 13:28:28 dlc Exp $ # ------------------------------------------------------------------- # Copyright (C) 2003 Ken Y. Clark , # darren chamberlain , @@ -42,8 +42,8 @@ The grammar is influenced heavily by Tim Bunce's "mysql2ora" grammar. use strict; use vars qw[ $DEBUG $VERSION $GRAMMAR @EXPORT_OK ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.9 $ =~ /(\d+)\.(\d+)/; -$DEBUG = 1 unless defined $DEBUG; +$VERSION = sprintf "%d.%02d", q$Revision: 1.10 $ =~ /(\d+)\.(\d+)/; +$DEBUG = 0 unless defined $DEBUG; use Data::Dumper; use Parse::RecDescent;