X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FApache%2FMVC.pm;h=68a9927bf113ae421c1e205f8b87f0f334fece46;hb=a0f5a455f933d562b30d9feb613098fb7ddc85b6;hp=8ed51bf1c9108a353b0bb2f05750951ab22d5188;hpb=7137ae307038838c154fec5240c629fdb9e8ac76;p=maypole.git diff --git a/lib/Apache/MVC.pm b/lib/Apache/MVC.pm index 8ed51bf..68a9927 100644 --- a/lib/Apache/MVC.pm +++ b/lib/Apache/MVC.pm @@ -105,10 +105,10 @@ sub parse_location { sub is_applicable { my $self = shift; my $config = $self->config; - my %ok = map {$_ => 1} @{$config->{display_tables}}; + $config->{ok_tables} = {map {$_ => 1} @{$config->{display_tables}}}; warn "We don't have that table ($self->{table})" - unless $ok{$self->{table}}; - return DECLINED() unless exists $ok{$self->{table}}; + unless $config->{ok_tables}{$self->{table}}; + return DECLINED() unless exists $config->{ok_tables}{$self->{table}}; # Does the action method exist? # XXX We should set the method class to the class for the table