From f2be8bc70771995cee422acb796ef09036677a3c Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Fri, 16 May 2025 16:47:22 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 5 ++++- tt/img | 4 +++- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/perl/Triple.pm b/perl/Triple.pm index 458e12c..47603c8 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -56,11 +56,14 @@ sub Triple::main { [ "Post", 1 ], [ "Sneed", 2 ], ); + my @threads = ( + @posts, + ); our $vars = { sitename => $sitename, version => $version, - posts => \@posts, + threads => \@threads, }; while($request->Accept() >= 0) { diff --git a/tt/img b/tt/img index daf7de6..d628763 100644 --- a/tt/img +++ b/tt/img @@ -47,8 +47,9 @@


+ [% FOREACH thread IN threads %]
- [% FOREACH post IN posts %] + [% FOREACH post IN thread %]
Anonymous no. [% post.1 %] @@ -57,6 +58,7 @@
[% END %]
+ [% END %] [% INCLUDE footer %]
-- 2.39.5