fo_arcview.pl and Archive.pm should now be nearly ready to go online. TODO: Some...

[selfforum.git] / selfforum-cgi / shared / Template / _thread.pm

diff --git a/selfforum-cgi/shared/Template/_thread.pm b/selfforum-cgi/shared/Template/_thread.pm
index 7b65d1d2b3a43184bf170a8a11bf0ee13632f137..5f105a66f4e4ab0e6ba820544b35a5c0fd7b8b7c 100644 (file)
--- a/selfforum-cgi/shared/Template/_thread.pm
+++ b/selfforum-cgi/shared/Template/_thread.pm
@@ -70,7 +70,9 @@ sub html_thread ($$$) {
              $temp -> {subject} => $_ -> {subject},
              $temp -> {cat}     => $_ -> {cat},
              $temp -> {time}    => plain(short_hr_time ($_ -> {time})),
-             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}})
+             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}}),
+             $temp -> {tid}     => $tid,
+             $temp -> {mid}     => $_ -> {mid},
            },
            $par -> {addParam}
           )} .
@@ -90,7 +92,9 @@ sub html_thread ($$$) {
              $temp -> {subject} => $_ -> {subject},
              $temp -> {cat}     => $_ -> {cat},
              $temp -> {time}    => plain(short_hr_time ($_ -> {time})),
-             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}})
+             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}}),
+             $temp -> {tid}     => $tid,
+             $temp -> {mid}     => $_ -> {mid},
            },
            $par -> {addParam}
           )}.
@@ -134,7 +138,9 @@ sub html_thread ($$$) {
              $temp -> {subject} => $_ -> {subject},
              $temp -> {cat}     => $_ -> {cat},
              $temp -> {time}    => plain(short_hr_time ($_ -> {time})),
-             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}})
+             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}}),
+             $temp -> {tid}     => $tid,
+             $temp -> {mid}     => $_ -> {mid},
            },
            $par -> {addParam}
           )}.
@@ -153,7 +159,9 @@ sub html_thread ($$$) {
              $temp -> {subject} => $_ -> {subject},
              $temp -> {cat}     => $_ -> {cat},
              $temp -> {time}    => plain(short_hr_time ($_ -> {time})),
-             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}})
+             $temp -> {link}    => query_string({$t => $tid, $p => $_ -> {mid}}),
+             $temp -> {tid}     => $tid,
+             $temp -> {mid}     => $_ -> {mid},
            },
            $par -> {addParam}
           )}.
@@ -170,5 +178,4 @@ sub html_thread ($$$) {
 
 #
 #
-### end of Template::_thread ###################################################
-
+### end of Template::_thread ###################################################
\ No newline at end of file