From f95d4d1dad59c1b82c3969199116722562399419 Mon Sep 17 00:00:00 2001 From: Aaron Trevena Date: Tue, 11 Oct 2005 19:08:06 +0000 Subject: [PATCH] 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 --- lib/Maypole.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 2.39.5