X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2FMaypole.pm;h=e8de04e077942839f500fb391fb5eb30a1476107;hb=349ed61cc56d78c7ce47eb08984c65d694d3aee0;hp=664df4b22ee8eb89732af415f9ed19015f6642bb;hpb=2e483f35964e1ddd2022df6adc2b6d6a631c0cbd;p=maypole.git diff --git a/lib/Maypole.pm b/lib/Maypole.pm index 664df4b..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 ) + 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 @@ -579,6 +584,10 @@ C list. See L for more information. Get/set a hash of template variables. +=head3 stash + +A place to put custom application data. Not used by Maypole itself. + =head3 template Get/set the template to be used by the view. By default, it returns