CheckForLoops not working

RT Developers
1

Hi,

CheckForLoops does not appear to work on our RT 2.0.13 system. The
problem is that the header line:

X-RT-Loop-Prevention: pokerpages.com

our config.pm though ( $rtname=“pokerpages.com”; ) so I’m not sure where
it comes from.

A possible fix, ignoring whitespace at the end of the header line, is
pasted below.

Gavin Scott
gavin@pokerpages.com

— Email.pm.original Tue Jul 30 16:44:13 2002
+++ Email.pm Tue Jul 30 16:45:00 2002
@@ -152,6 +152,7 @@
#If this instance of RT sent it our, we don’t want to take it in
my $RTLoop = $head->get(“X-RT-Loop-Prevention”) || “”;
chomp ($RTLoop); #remove that newline

  • $RTLoop =~ s/^(.*?)\s+$/$1/; #remove whitespace at end of line
    if ($RTLoop eq “$RT::rtname”) {
    return (1);
    }
2

Gavin Scott wrote:

CheckForLoops does not appear to work on our RT 2.0.13 system. The
problem is that the header line:

X-RT-Loop-Prevention: pokerpages.com

sent by our RT system contains a space at the end. There is no space in
our config.pm though ( $rtname=“pokerpages.com”; ) so I’m not sure where
it comes from.

That’s bizarre.

Do other header lines have extraneous spaces?
What exactly does the RT-Ticket: header contain?
What version of the MIME::Tools (MIME::Entity and MIME::Parser)
do you have?

3

[ snip ]

That’s bizarre.

Do other header lines have extraneous spaces?
What exactly does the RT-Ticket: header contain?
What version of the MIME::Tools (MIME::Entity and MIME::Parser)
do you have?

I’m attaching a sample of the headers from one of our RT system mails,
hopefully it comes through properly. Some but not all lines have spaces
at the end.

The RT-Ticket line is:

RT-Ticket: pokerpages.com #14170

My MIME versions are:

MIME::Tools
CPAN_VERSION 5.411
MIME::Entity
CPAN_VERSION 5.404
MIME::Parser
CPAN_VERSION 5.406

Thanks,
Gavin Scott
gavin@pokerpages.com

rtmailheaders (1.11 KB)

4

Gavin Scott wrote:

I’m attaching a sample of the headers from one of our RT system mails,
hopefully it comes through properly. Some but not all lines have spaces
at the end.

Which is even more bizarre. The From:, Reply-To:, and To: headers
are all non-spaced but all of the others are. And every header is
added in the same way, using RT::Action::SendEmail::SetHeader(),
which uses MIME::Head::add() (via MIME::Entity::head).

(The reason I asked for the RT-Ticket: header was also to check
that $rtname as it appeared in the middle of that one didn’t have
an extra space appended by that stage… it looked fine.)

MIME::Tools
CPAN_VERSION 5.411
MIME::Entity
CPAN_VERSION 5.404
MIME::Parser
CPAN_VERSION 5.406

Same here all around. But I don’t see weird spaces.

Sorry, I’m out of clues now. :frowning: