RT# 75817 - Some small updates to be able to backport to V3 because of no cust_contac...
[freeside.git] / bin / print-schema
1 #!/usr/bin/perl
2
3 use DBIx::DBSchema;
4
5 $l = load DBIx::DBSchema "/usr/local/etc/freeside/dbdef.DBI:Pg:dbname=freeside";
6
7 print $l->pretty_print, "\n";