From: Aaron Trevena Date: Tue, 11 Oct 2005 19:08:06 +0000 (+0000) Subject: fix applied for http://rt.cpan.org/Ticket/Display.html?id=14661 X-Git-Tag: 2.11~124 X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=commitdiff_plain;h=f95d4d1dad59c1b82c3969199116722562399419 fix applied for http://rt.cpan.org/Ticket/Display.html?id=14661 git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@394 48953598-375a-da11-a14b-00016c27c3ee --- diff --git a/lib/Maypole.pm b/lib/Maypole.pm index 89eae6b..4f52493 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -240,7 +240,7 @@ sub is_applicable warn "We don't have that table ($table).\n" . "Available tables are: " - . join( ",", @{ $config->display_tables } ) + . join( ",", @{ $config->ok_tables } ) if $self->debug and not $config->ok_tables->{$table} and $self->action; # this is probably always true