[vhffs-dev] Mail delivery failed: returning message to sender

[Mail Delivery System <Mailer-Daemon@xxxxxxxxxxxxxxxxx>]

This message was created automatically by mail delivery software.

A message that you sent could not be delivered to one or more of its
recipients. This is a permanent error. The following address(es) failed:

  vhffs-dev@xxxxxxxxx
    local delivery failed

------ This is a copy of the message, including all the headers. ------

Return-path: <vhffs-dev@xxxxxxxxx>
Received: from netu.naquadah.org ([212.85.153.236])
	by mx1.tuxfamily.net with esmtp (Exim 4.50)
	id 1F8Jkk-0008Ni-AO
	for vhffs-dev@xxxxxxxxx; Sun, 12 Feb 2006 17:07:10 +0100
Received: from jd by netu.naquadah.org with local (Exim 4.50)
	id 1F8Jke-00066s-Vr
	for vhffs-dev@xxxxxxxxx; Sun, 12 Feb 2006 17:07:05 +0100
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: quoted-printable
Subject: [svn] commit: r157 - /trunk/vhffs-listengine/src/listengine.pl
Date: Sun, 12 Feb 2006 16:07:04 -0000
To: vhffs-dev@xxxxxxxxx
From: vhffs-dev@xxxxxxxxx
X-Mailer: svnmailer-1.0.3
Message-Id: <E1F8Jke-00066s-Vr@xxxxxxxxxxxxxxxxx>

Author: jd
Date: Sun Feb 12 17:07:03 2006
New Revision: 157

Log:
on a rien vu

Modified:
    trunk/vhffs-listengine/src/listengine.pl

Modified: trunk/vhffs-listengine/src/listengine.pl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/vhffs-listengine/src/listengine.pl (original)
+++ trunk/vhffs-listengine/src/listengine.pl Sun Feb 12 17:07:03 2006
@@ -411,11 +411,12 @@
     add_list_header( $mail , $list );
     $mail->replace( 'Reply-To' , $list->get_localpart ."\@" . $list->get_d=
omain ) if( $list->get_replyto =3D=3D 1 );
=20
+
+    #Add prefix if not null
+    my $subject=3D$mail->get('Subject');
+    my $prefix=3D$list->get_prefix;
     my $qprefix =3D quotemeta $prefix;
-    #Add prefix if not null
-	my $subject=3D$mail->get('Subject');
-	  my $prefix=3D$list->get_prefix;
-	unless ($subject=3D~ /^.*\[$qprefix\].*$/)
+    unless ($subject=3D~ /^.*\[$qprefix\].*$/)
       {
       $mail->replace( 'Subject' , "[".$list->get_prefix."]" . " " . $mail-=
>get('Subject') ) if( length( $list->get_prefix ) > 0 );
       }