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 89eae6b77cf46e15f11343d2c253ea1c3dfe63df..4f52493ef567b15b9226581160ce6658c4d7169a 100644 (file)
--- 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