Schema::Graph - switch ugly use of Log4perl to an even uglier (but at least available...

[dbsrgits/SQL-Translator.git] / bin / sqlt-diff-old

diff --git a/bin/sqlt-diff-old b/bin/sqlt-diff-old
index 0b3839c..52cac4f 100755 (executable)
--- a/bin/sqlt-diff-old
+++ b/bin/sqlt-diff-old
@@ -2,8 +2,6 @@
 # vim: set ft=perl:
 
 # -------------------------------------------------------------------
-# $Id$
-# -------------------------------------------------------------------
 # Copyright (C) 2002-2009 The SQLFairy Authors
 #
 # This program is free software; you can redistribute it and/or
@@ -96,6 +94,9 @@ use Data::Dumper;
 use SQL::Translator;
 use SQL::Translator::Schema::Constants;
 
+use vars qw( $VERSION );
+$VERSION = '1.99';
+
 my ( @input, $list, $help, $debug );
 for my $arg ( @ARGV ) {
     if ( $arg =~ m/^-?-l(ist)?$/ ) {