Replace this properly

diff --git a/lib/App/SCS/Plugin/Core/PagePlugin/PageData.pm b/lib/App/SCS/Plugin/Core/PagePlugin/PageData.pm
index 142f474..bfcad4f 100644 (file)
--- a/lib/App/SCS/Plugin/Core/PagePlugin/PageData.pm
+++ b/lib/App/SCS/Plugin/Core/PagePlugin/PageData.pm
@@ -72,7 +72,12 @@ sub filter_content_zoom {
            my $author_templ = $static_dir . "/author-html/$author.html";
 
            if (-f $author_templ) {
-               $_[0]->replace(HTML::Zoom->from_file($author_templ));
+                $_[0]->replace(sub {
+                   HTML::Zoom->from_file($author_templ)->collect('body', {
+                     into => \my @replace_with,
+                   })->run;
+                   HTML::Zoom::ArrayStream->new({ array => \@replace_with })
+                 });
            } else {
                $_[0]->replace('');
            }