summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorByron Jones <bjones@mozilla.com>2012-04-11 12:08:26 +0200
committerByron Jones <bjones@mozilla.com>2012-04-11 12:08:26 +0200
commit24f741df2f56c77a603f9e4c6bcb2bbcd7871dff (patch)
tree2428b09608bd09777f9e57b68d004ab2bd9d2e5c
parent9ffabb578d4679d90c4733964203fa3e631482e9 (diff)
downloadbugzilla-24f741df2f56c77a603f9e4c6bcb2bbcd7871dff.tar.gz
bugzilla-24f741df2f56c77a603f9e4c6bcb2bbcd7871dff.tar.xz
Bug 744022: minor arecibo report tweaks
-rw-r--r--Bugzilla/Arecibo.pm10
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,