diff options
| -rw-r--r-- | Bugzilla/Arecibo.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/Bugzilla/Arecibo.pm b/Bugzilla/Arecibo.pm index 92c99c399..11563e834 100644 --- a/Bugzilla/Arecibo.pm +++ b/Bugzilla/Arecibo.pm @@ -77,7 +77,7 @@ use constant CONFIG => { # any error messages matching these regex's will not be sent to arecibo ignore => [ - qr/^Software caused connection abort/, + qr/Software caused connection abort/, ], }; @@ -167,10 +167,18 @@ sub arecibo_handle_error { my $username = ''; eval { $username = Bugzilla->user->login }; + my $request = ''; + foreach my $name (sort { lc($a) cmp lc($b) } keys %ENV) { + $request .= "$name=$ENV{$name}\n"; + } + chomp($request); + my $data = [ + ip => remote_ip(), msg => $message, priority => $priority, server => hostname(), + request => $request, status => '500', timestamp => email_gmdate(), traceback => $traceback, |