From f71ac6709f1a18cd3f216fc8deda33a0605360a0 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@volo>
Date: Tue, 7 Nov 2006 18:05:46 -0800
Subject: [PATCH] disallow forwarded being set to a $gEmailDomain address
---
debian/changelog | 2 ++
scripts/process.in | 4 ++++
2 files changed, 6 insertions(+)
diff --git a/debian/changelog b/debian/changelog
index 3bb240c9..a6731457 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -139,6 +139,8 @@ debbugs (2.4.2) UNRELEASED; urgency=low
be archived. (closes: #153536)
- my_url in pkgreport.cgi now returns the complete url (closes: #378566)
- Document precisely how forwarded works (closes: #228049)
+ - Dissallow forwarded being set to a $gEmailDomain address
+ (closes: #397486)
-- Colin Watson <cjwatson@debian.org> Fri, 20 Jun 2003 18:57:25 +0100
diff --git a/scripts/process.in b/scripts/process.in
index 6569260f..bdeec7f7 100755
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -283,6 +283,10 @@ if ($codeletter eq 'D' || $codeletter eq 'F')
$receivedat= "forwarded\@$gEmailDomain";
$markaswhat= 'forwarded';
$set_forwarded= $header{'to'};
+ # Dissallow forwarded being set to this bug tracking system
+ if (defined $set_forwarded and $set_forwarded =~ /\Q$gEmailDomain\E/) {
+ undef $set_forwarded;
+ }
if ( length( $gListDomain ) > 0 && length( $gForwardList ) > 0 ) {
push @generalcc, "$gForwardList\@$gListDomain";
$generalcc= "$gForwardList\@$gListDomain";
--
2.39.5