X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole.pm;h=e8de04e077942839f500fb391fb5eb30a1476107;hb=349ed61cc56d78c7ce47eb08984c65d694d3aee0;hp=253534087642b277729e1d2e82e456cd8f551255;hpb=1d4cf48b6f75c5273fb800ca9442bd423b8c772b;p=maypole.git

diff --git a/lib/Maypole.pm b/lib/Maypole.pm
index 2535340..e8de04e 100644
--- a/lib/Maypole.pm
+++ b/lib/Maypole.pm
@@ -19,7 +19,7 @@ __PACKAGE__->mk_classdata($_) for qw( config init_done view_object );
 __PACKAGE__->mk_accessors(
     qw( params query objects model_class template_args output path
         args action template error document_encoding content_type table
-        headers_in headers_out stash )
+        headers_in headers_out stash)
 );
 __PACKAGE__->config( Maypole::Config->new() );
 __PACKAGE__->init_done(0);
@@ -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
@@ -377,6 +377,10 @@ sub redirect_request {
   die "parse_location is a virtual method. Do not use Maypole directly; use Apache::MVC or similar";
 }
 
+sub redirect_internal_request {
+
+}
+
 sub send_output {
     die "send_output is a virtual method. Do not use Maypole directly; use Apache::MVC or similar";
 }
@@ -532,6 +536,7 @@ You should only need to define this method if you are writing a new
 Maypole backend. It should return something that looks like an Apache
 or CGI request object, it defaults to blank.
 
+=head3 default_table_view
 
 =head3 is_applicable