Reduce $Id to its normal form

[dbsrgits/SQL-Translator.git] / bin / sqlt-diagram

diff --git a/bin/sqlt-diagram b/bin/sqlt-diagram
index 3b5a1ea..005c541 100755 (executable)
--- a/bin/sqlt-diagram
+++ b/bin/sqlt-diagram
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 # -------------------------------------------------------------------
-# $Id: sqlt-diagram 1440 2009-01-17 16:31:57Z jawnsy $
+# $Id$
 # -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
 #
@@ -75,6 +75,9 @@ use Getopt::Long;
 use Pod::Usage;
 use SQL::Translator;
 
+use vars '$VERSION';
+$VERSION = '1.99';
+
 #
 # Get arguments.
 #