aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
Diffstat (limited to 'perllib')
-rw-r--r--perllib/Plack/Middleware/Debug/FixMyStreet/Template.pm33
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;