DOS->Unix

[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 3f00ad25c8655a146ed959dd0154c805fcbc2729..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}
           )}.