add northern cyprus, RT#39335

[freeside.git] / bin / print-schema

#!/usr/bin/perl

use DBIx::DBSchema;

$l = load DBIx::DBSchema "/usr/local/etc/freeside/dbdef.DBI:Pg:dbname=freeside";

print $l->pretty_print, "\n";