bouncing mail

[Denis Beauchemin]

<x-flowed>
Julian Field wrote:

> At 20:07 15/09/2004, you wrote:
>
>> Julian Field wrote:
>>
>>> At 19:27 15/09/2004, you wrote:
>>>
>>>> I have it working OK in my test setup but I was trying 
>>>> unsuccessfully to
>>>> include the $longspamreport in the report.  Is there some way of 
>>>> achieving
>>>> this?  I tested it with mailscanner-4.29.7-1.
>>>
>> The report being used is sender.spam.sa.report.txt.
>
>
> Here is a little patch for Message.pm that should do what you want. If it
> works, let me know and I'll put it in the next release.
>
> -----SNIP-----
> --- Message.pm.old 2004-09-14 09:40:48.000000000 +0100
> +++ Message.pm  2004-09-15 20:18:47.000000000 +0100
> @@ -656,7 +656,7 @@
>  sub HandleSpamBounce {
>    my $this = shift;
>
> -  my($from,$to,$subject,$date,$spamreport,$hostname);
> +  my($from,$to,$subject,$date,$spamreport,$longspamreport,$hostname);
>    my($emailmsg, $line, $messagefh, $filename, $localpostmaster, $id);
>
>    $from = $this->{from};
> @@ -692,6 +692,7 @@
>    $subject = $this->{subject};
>    $date = scalar localtime;
>    $spamreport = $this->{spamreport};
> +  $longspamreport = $this->{salongreport};
>
>    my($to, %tolist);
>    foreach $to (@{$this->{to}}) {
> -----SNIP-----

Julian,

It didn't work on my older MS (4.29.7-1).  I applied the patch manually 
and restarted MS (I made sure no MS process was still running before 
relaunching).  I got a blank line where I put $longspamreport in the report.

Here is the diff for my version:
--- Message.pm  2004-09-15 15:38:30.000000000 -0400
+++ Message.pm.20040915 2004-09-15 15:34:55.000000000 -0400
@@ -738,5 +738,5 @@
   my $this = shift;

-  
my($from,$to,$subject,$date,$spamreport,$longspamreport,$hostname,$day,$month,$year);
+  my($from,$to,$subject,$date,$spamreport,$hostname,$day,$month,$year);
   my($emailmsg, $line, $messagefh, $filename, $localpostmaster, $id);

@@ -773,5 +773,4 @@
   $date = scalar localtime;
   $spamreport = $this->{spamreport};
-  $longspamreport = $this->{salongreport};
   # And let them put the date number in there too
   ($day, $month, $year) = (localtime)[3,4,5];

> -- 
> Julian Field
> www.MailScanner.info
> Professional Support Services at www.MailScanner.biz
> MailScanner thanks transtec Computers for their support
> Buy the MailScanner book at www.MailScanner.info/store
>
> PGP footprint: EE81 D763 3DB0 0BFD E1DC 7222 11F6 5947 1415 B654
>
> ------------------------ MailScanner list ------------------------
> To unsubscribe, email jiscmail at jiscmail.ac.uk with the words:
> 'leave mailscanner' in the body of the email.
> Before posting, read the MAQ (http://www.mailscanner.biz/maq/) and
> the archives (http://www.jiscmail.ac.uk/lists/mailscanner.html).
>


-- 
   _
  °v°   Denis Beauchemin, analyste
 /(_)\  Université de Sherbrooke, S.T.I.
  ^ ^   T: 819.821.8000x2252 F: 819.821.8045

------------------------ MailScanner list ------------------------
To unsubscribe, email jiscmail at jiscmail.ac.uk with the words:
'leave mailscanner' in the body of the email.
Before posting, read the MAQ (http://www.mailscanner.biz/maq/) and
the archives (http://www.jiscmail.ac.uk/lists/mailscanner.html).

</x-flowed>