135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

properly search the template path!! [#103]

Browse Source 
Conflicts:
	Netdisco/lib/App/Netdisco/Web.pm
	Netdisco/lib/App/Netdisco/Web/Plugin.pm
This commit is contained in:
Oliver Gorwits
2014-06-23 20:35:30 +01:00
parent f29c8960ed
commit 6dbed02b7c
5 changed files with 33 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Netdisco/lib/App/Netdisco/Web.pm
View File

@@ -48,6 +48,10 @@ if (setting('extra_web_plugins') and ref [] eq ref setting('extra_web_plugins'))
_load_web_plugins( setting('extra_web_plugins') );
}
# after plugins are loaded, add our own template path
push @{ config->{engines}->{netdisco_template_toolkit}->{INCLUDE_PATH} },
setting('views');
# workaround for https://github.com/PerlDancer/Dancer/issues/935
hook after_error_render => sub { setting('layout' => 'main') };

7
Netdisco/lib/App/Netdisco/Web/Plugin.pm
View File

@@ -21,7 +21,7 @@ set(
);
# this is what Dancer::Template::TemplateToolkit does by default
config->{engines}->{template_toolkit}->{INCLUDE_PATH} ||= [ setting('views') ];
config->{engines}->{netdisco_template_toolkit}->{INCLUDE_PATH} ||= [ setting('views') ];
register 'register_template_path' => sub {
my ($self, $path) = plugin_args(@_);
@@ -30,9 +30,8 @@ register 'register_template_path' => sub {
return error "bad template path to register_template_paths";
}
unshift
@{ config->{engines}->{template_toolkit}->{INCLUDE_PATH} },
$path, dir($path, 'views')->stringify;
push @{ config->{engines}->{netdisco_template_toolkit}->{INCLUDE_PATH} },
dir($path, 'views')->stringify;
};
sub _register_include {

23
Netdisco/lib/Dancer/Template/NetdiscoTemplateToolkit.pm Normal file
View File

@@ -0,0 +1,23 @@
package Dancer::Template::NetdiscoTemplateToolkit;
use strict;
use warnings;
use Dancer::FileUtils 'path';
use base 'Dancer::Template::TemplateToolkit';
sub view {
my ($self, $view) = @_;
foreach my $path (@{ $self->config->{INCLUDE_PATH} }) {
foreach my $template ($self->_template_name($view)) {
my $view_path = path($path, $template);
return $view_path if -f $view_path;
}
}
# No matching view path was found
return;
}
1;