| Subject: | Small feature request (SQL::Translator::Producer::GraphViz) |
| Date: | Wed, 11 Apr 2012 13:40:03 +0200 |
| To: | bug-SQL-Translator [...] rt.cpan.org |
| From: | Sebastian Podjasek <sebastian [...] podjasek.pl> |
It will be nice if in addition to 'skip_tables_like' you could also do
'skip_fkeys_like' to skip some relations that you don't need at the
moment. It could be done as simple as this:
--- GraphViz.pm 2011-05-04 18:06:57.000000000 +0200
+++ GraphViz.pm.my 2012-04-11 13:11:58.000000000 +0200
@@ -565,6 +565,7 @@
my $fk_table = $c->reference_table or next;
for my $field_name ( $c->fields ) {
+ next if defined $args->{skip_fkeys_like} and $field_name =~ $args->{skip_fkeys_like};
for my $fk_field ( $c->reference_fields ) {
next unless defined $schema->get_table( $fk_table );
KR,
Sebastian
--
Sebastian Podjasek