diff options
author | Byron Jones <bjones@mozilla.com> | 2012-04-11 12:08:26 +0200 |
---|---|---|
committer | Byron Jones <bjones@mozilla.com> | 2012-04-11 12:08:26 +0200 |
commit | 24f741df2f56c77a603f9e4c6bcb2bbcd7871dff (patch) | |
tree | 2428b09608bd09777f9e57b68d004ab2bd9d2e5c | |
parent | 9ffabb578d4679d90c4733964203fa3e631482e9 (diff) | |
download | bugzilla-24f741df2f56c77a603f9e4c6bcb2bbcd7871dff.tar.gz bugzilla-24f741df2f56c77a603f9e4c6bcb2bbcd7871dff.tar.xz |
Bug 744022: minor arecibo report tweaks
-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, |