net-mail/mailman: add mhonarc patches

git-svn-id: https://svn.disconnected-by-peer.at/svn/linamh/trunk/linamh@1110 6952d904-891a-0410-993b-d76249ca496b
This commit is contained in:
geos_one
2009-04-18 20:48:17 +00:00
parent f8bd7c9d79
commit 55a15a7167
4 changed files with 91 additions and 5 deletions

View File

@@ -0,0 +1,45 @@
--- MHonArc-2.6.16/lib/mhthread.pl.orig 2006-09-08 20:46:48.000000000 -0700
+++ MHonArc-2.6.16/lib/mhthread.pl 2006-09-08 20:47:14.000000000 -0700
@@ -406,22 +406,22 @@
## Decrement level count if their were replies
--$level if ($haverepls);
+ ## Close entry text
+ if ($attop) {
+ &print_thread_var($handle, $idx, \$TTOPEND);
+ } elsif (!$single && !$didtliend) {
+ &print_thread_var($handle, $idx, \$TLIEND);
+ }
+
## Check for missing messages
if ($DoMissingMsgs && !($attop || $single)) {
for ($i=$depth; $i > 0; --$i) {
- &print_thread_var($handle, $idx, \$TLINONEEND);
&print_thread_var($handle, $idx, \$TSUBLISTEND)
if $level <= $TLEVELS;
+ &print_thread_var($handle, $idx, \$TLINONEEND);
--$level;
}
}
-
- ## Close entry text
- if ($attop) {
- &print_thread_var($handle, $idx, \$TTOPEND);
- } elsif (!$single && !$didtliend) {
- &print_thread_var($handle, $idx, \$TLIEND);
- }
}
##---------------------------------------------------------------------------
@@ -636,9 +636,9 @@
## Check for missing messages
if ($DoMissingMsgs && !($attop || $single)) {
for ($i = $depth; $i > 0; $i--) {
- $ret .= &expand_thread_var($idx, \$TSLICELINONEEND);
$ret .= &expand_thread_var($idx, \$TSLICESUBLISTEND)
if $level <= $TSLICELEVELS;
+ $ret .= &expand_thread_var($idx, \$TSLICELINONEEND);
$level--;
}
}