summaryrefslogtreecommitdiffstats
path: root/extensions/BMO/Extension.pm
diff options
context:
space:
mode:
authorByron Jones <glob@mozilla.com>2015-03-03 05:03:24 +0100
committerByron Jones <glob@mozilla.com>2015-03-03 05:03:24 +0100
commit3208ebbf96c52c8b62f92524dc92ce3a0c6b4048 (patch)
tree405dd42ce8273d09fa21353b42b166ab9d8b4032 /extensions/BMO/Extension.pm
parenta428a8601568468c8237afb2e3272e0477f7d26c (diff)
downloadbugzilla-3208ebbf96c52c8b62f92524dc92ce3a0c6b4048.tar.gz
bugzilla-3208ebbf96c52c8b62f92524dc92ce3a0c6b4048.tar.xz
Bug 880552: Add links to socorro from the crash signatures in show_bug.cgi
Diffstat (limited to 'extensions/BMO/Extension.pm')
-rw-r--r--extensions/BMO/Extension.pm16
1 files changed, 15 insertions, 1 deletions
diff --git a/extensions/BMO/Extension.pm b/extensions/BMO/Extension.pm
index 0e43830ee..62f88287a 100644
--- a/extensions/BMO/Extension.pm
+++ b/extensions/BMO/Extension.pm
@@ -45,9 +45,10 @@ use Email::MIME::ContentType qw(parse_content_type);
use Encode qw(find_encoding encode_utf8);
use File::MimeInfo::Magic;
use List::MoreUtils qw(natatime);
-use Scalar::Util qw(blessed);
use List::Util qw(first);
+use Scalar::Util qw(blessed);
use Sys::Syslog qw(:DEFAULT setlogsock);
+use Text::Balanced qw( extract_bracketed extract_multiple );
use Bugzilla::Extension::BMO::Constants;
use Bugzilla::Extension::BMO::FakeBug;
@@ -130,6 +131,9 @@ sub template_before_process {
$vars->{'versions'} = [ reverse @$versions ];
}
}
+ elsif ($file eq 'bug/edit.html.tmpl') {
+ $vars->{split_cf_crash_signature} = $self->_split_crash_signature($vars);
+ }
if ($file =~ /^list\/list/ || $file =~ /^bug\/create\/create[\.-]/) {
@@ -1860,4 +1864,14 @@ sub bug_comments {
}
}
+sub _split_crash_signature {
+ my ($self, $vars) = @_;
+ my $bug = $vars->{bug} // return;
+ my $crash_signature = $bug->cf_crash_signature // return;
+ return [
+ grep { /\S/ }
+ extract_multiple($crash_signature, [ sub { extract_bracketed($_[0], '[]') } ])
+ ];
+}
+
__PACKAGE__->NAME;