diff --git a/layouts/category.html b/layouts/category.html index 2c672991..91256510 100644 --- a/layouts/category.html +++ b/layouts/category.html @@ -11,9 +11,7 @@ - + ('./include/header.html') ?>

{category} ?>

? for (@{$vars->{files}}) { @@ -30,18 +28,6 @@

{category} ?>

? }
- + ('./include/footer.html') ?> diff --git a/layouts/include/footer.html b/layouts/include/footer.html new file mode 100644 index 00000000..1588f1f0 --- /dev/null +++ b/layouts/include/footer.html @@ -0,0 +1,13 @@ + diff --git a/layouts/include/header.html b/layouts/include/header.html new file mode 100644 index 00000000..7cf7f987 --- /dev/null +++ b/layouts/include/header.html @@ -0,0 +1,3 @@ + diff --git a/lib/PerlUsersJP/Builder.pm b/lib/PerlUsersJP/Builder.pm index f1365074..e4d64439 100644 --- a/lib/PerlUsersJP/Builder.pm +++ b/lib/PerlUsersJP/Builder.pm @@ -623,11 +623,12 @@ sub _render_string { my $renderer = eval <<~ "..." or die $@; sub { my \$vars = shift; + my \$include = shift; $code->(); } ... - return $renderer->($vars); + return $renderer->($vars, sub { $self->_render_string(@_) }); } sub _normalize_name {