-@@ -174,19 +174,16 @@
- my $args = shift;
- writelog($args,LOG_INFO, __PACKAGE__.": Accepting message");
-
-- #TODO Courier filters cannot rewrite MIME messages, we'd like
-- #to be able to add a header or something to this message but
-- #we can't.(yet). Sorry
--
- ##Rewrite the message in the queue if we need to add a header
-- #if ($cfg_x_header) {
-- # my $queuefile = IO::File->new("+>$$args{'messagefile'}");
-- # print $queuefile "$cfg_x_header_tag: $cfg_x_header_line\n";
-- # while (my $line=$$args{'filehandle'}->getline()) {
-- # print $queuefile $line;
-- # }
-- # close($queuefile);
-- #}
-+ if ($cfg_x_header) {
-+ my $queuefile = IO::File->new("+>$$args{'messagefile'}");
-+ print $queuefile "$cfg_x_header_tag: $cfg_x_header_line\n";
-+ while (my $line=$$args{'filehandle'}->getline()) {
-+ print $queuefile $line;
-+ }
-+ print STDOUT $queuefile;
-+ close($queuefile);
-+ }
-
- $$args{'status'} = 'accept';
-