diff options
Diffstat (limited to 'bin/dbdef-create')
| -rwxr-xr-x | bin/dbdef-create | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/bin/dbdef-create b/bin/dbdef-create index 902f7f145..e71eb36b4 100755 --- a/bin/dbdef-create +++ b/bin/dbdef-create @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: dbdef-create,v 1.3 2001-04-15 12:56:31 ivan Exp $ +# $Id: dbdef-create,v 1.4 2001-08-17 10:57:40 ivan Exp $ # # create dbdef file for existing mySQL database (needs SHOW|DESCRIBE command # not in Pg) based on fs-setup @@ -8,7 +8,10 @@ # ivan@sisd.com 98-jun-2 # # $Log: dbdef-create,v $ -# Revision 1.3 2001-04-15 12:56:31 ivan +# Revision 1.4 2001-08-17 10:57:40 ivan +# gah +# +# Revision 1.3 2001/04/15 12:56:31 ivan # s/dbdef/DBIx::DBSchema/ # # Revision 1.2 1998/11/19 11:17:44 ivan @@ -29,6 +32,8 @@ my($dbdef_file) = "/usr/local/etc/freeside/dbdef.". datasrc; my $dbdef = new_native DBIx::DBSchema $dbh; +#print $dbdef->pretty_print; + #important $dbdef->save($dbdef_file); |