135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

support override of reports

Browse Source
This commit is contained in:
Oliver Gorwits
2014-10-05 12:34:02 +01:00
parent 745a3b7a63
commit 7630b6ec7b
1 changed files with 12 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
Netdisco/lib/App/Netdisco/Web/Plugin.pm
View File

@@ -169,20 +169,21 @@ register 'register_report' => sub {
return error "bad config to register_report";
}
foreach my $tag (@{setting('_reports_menu')->{ $config->{category} }}) {
if ($tag eq $config->{tag}) {
setting('_reports')->{$tag} = $config;
return;
}
if (0 == scalar grep {$_ eq $config->{tag}}
@{setting('_reports_menu')->{ $config->{category} }}) {
push @{setting('_reports_menu')->{ $config->{category} }}, $config->{tag};
}
push @{setting('_reports_menu')->{ $config->{category} }}, $config->{tag};
setting('_reports')->{$config->{tag}} = $config;
foreach my $tag (@{setting('_reports_menu')->{ $config->{category} }}) {
if ($config->{tag} eq $tag) {
setting('_reports')->{$tag} = $config;
foreach my $rconfig (@{setting('reports')}) {
if ($rconfig->{tag} eq $config->{tag}) {
setting('_reports')->{$config->{tag}}->{'rconfig'} = $rconfig;
last;
foreach my $rconfig (@{setting('reports')}) {
if ($rconfig->{tag} eq $tag) {
setting('_reports')->{$tag}->{'rconfig'} = $rconfig;
last;
}
}
}
}
};