Filetype Reports in 4.24-5

[Hirsh, Joshua]

Just applied this now. It seems to have fixed it.

 Thanks Mariano :)


-Joshua


-----Original Message-----
From: Mariano Absatz [mailto:mailscanner at LISTS.COM.AR]
Sent: Tuesday, October 07, 2003 5:27 PM
To: MAILSCANNER at JISCMAIL.AC.UK
Subject: Re: Filetype Reports in 4.24-5


Yup... it seems to be originated in my code, but I don't know if Julian
modified this or not... however, try using
this patch (WARNING!!!!! NOT TESTED):

--- Message.pm.orig     Tue Oct  7 18:18:40 2003
+++ Message.pm  Tue Oct  7 18:19:40 2003
@@ -1014,7 +1014,7 @@
   }
   while (($file, $text) = each %{$this->{namereports}}) {
     #print STDERR "Adding file $file report $text\n";
-    $text =~ s/\n(.)/\n$Name:  $1/g; # Make sure name is at the front of
this
+    $text =~ s/\n(.)/\n$Name $1/g if $Name ; # Make sure name is at the
front of this
     $this->{allreports}{$file} .= $Name . $text;
   }
   while (($file, $text) = each %{$this->{nametypes}}) {