diff options
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/Plack/Middleware/Debug/FixMyStreet/Template.pm | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/perllib/Plack/Middleware/Debug/FixMyStreet/Template.pm b/perllib/Plack/Middleware/Debug/FixMyStreet/Template.pm new file mode 100644 index 000000000..05cb9f18a --- /dev/null +++ b/perllib/Plack/Middleware/Debug/FixMyStreet/Template.pm @@ -0,0 +1,33 @@ +package Plack::Middleware::Debug::FixMyStreet::Template; + +=head1 NAME + +Plack::Middleware::Debug::FixMyStreet::Template - +small subclass for FixMyStreet-specific tweaks. + +=head1 VERSION + +Version 1.00 + +=cut + +our $VERSION = '1.00'; + +use strict; +use warnings; +use parent qw(Plack::Middleware::Debug::Template); + +sub show_pathname { 1 } + +sub hook_pathname { + my ($self, $name) = @_; + $name =~ s/^.*templates\/web\///; + $name; +} + +sub ignore_template { + my ($self, $template) = @_; + return 1 if $template eq 'site-name.html'; +} + +1; |