our > use vars
[dbsrgits/SQL-Translator.git] / lib / SQL / Translator / Schema / Graph.pm
index 8d8c532..2b8107f 100644 (file)
@@ -29,7 +29,7 @@ use Class::MakeMethods::Template::Hash (
   'number --counter' => [ qw( order ) ],
 );
 
-use vars qw/$DEBUG/;
+our $DEBUG;
 $DEBUG = 0 unless defined $DEBUG;
 
 sub init {