With a little help I produced a patch to fix the problem, but i don't know if
the code still does what it should do.

So I will still forward this bug to upstream and let him handle it...
but if you like give the following patch a try...
without any warranty .. ;)


--- PFDiskStore.pm~     2008-03-24 14:07:46.000000000 +0100
+++ PFDiskStore.pm      2008-10-01 22:28:39.000000000 +0200
@@ -506,8 +506,8 @@
   # Handle trackback -- This is the tricky one
   if ($configwords[1] =~ /tr[ua]/i) {
     #print STDERR "Trackback:\n";
-    while ([EMAIL PROTECTED](@{$body})-1] !~ /^\s*$/) {
-      print "Line is ****" . [EMAIL PROTECTED](@{$body})-1] . "****\n";
+    while ($body->[-1] !~ /^\s*$/) {
+      print "Line is ****" . $body->[-1] . "****\n";
       pop @{$body};
       #print STDERR ".";
     }


-- 
Regards
Simon Walter



-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to