# vim: set ft=perl:
# -------------------------------------------------------------------
-# $Id: sqlt-diff,v 1.15 2007-03-06 23:49:42 duality72 Exp $
+# $Id: sqlt-diff,v 1.16 2007-03-08 23:11:20 duality72 Exp $
# -------------------------------------------------------------------
# Copyright (C) 2002-4 The SQLFairy Authors
#
use SQL::Translator::Schema::Constants;
use vars qw( $VERSION );
-$VERSION = sprintf "%d.%02d", q$Revision: 1.15 $ =~ /(\d+)\.(\d+)/;
+$VERSION = sprintf "%d.%02d", q$Revision: 1.16 $ =~ /(\d+)\.(\d+)/;
my ( @input, $list, $help, $debug, $trace, $caseopt , $ignore_index_names, $ignore_constraint_names, $output_db );
for my $arg ( @ARGV ) {
{ caseopt => $caseopt,
ignore_index_names => $ignore_index_names,
ignore_constraint_names => $ignore_constraint_names,
+ output_db => $output_db,
debug => $debug,
trace => $trace });
if($result)