my $grname = $main::GROUPS{$name}->{'name'};
print "<tr><td align=left bgcolor=#ffffff nowrap>\n";
- print "<a href=\"!!WWWSPONG!!/group/$name\">$grname</a></td>\n";
+ print "<a href=\"!!WWWSPONG!!/full/overview/$name\">$grname</a></td>\n";
foreach $service ( @names ) {
my $color = $group->services_color( $service );
foreach $service ( sort keys %main::SERVICES ) {
push( @names, $service ) unless $service eq "ping"; }
- # Run though reach group and print the hosts for each group
+ # Run though each group and print the hosts for each group
foreach $group ( $self->groups() ) {
my $name = $group->name();
my $grname = $main::GROUPS{$name}->{'name'};
# Display the host group table
- print "<strong>Group - $grname</strong>\n";
+# print "<a href=\"$main::WWWSPONG/group/$name\">";
+ print "<strong>Group - $grname</strong>";
+# print "</a>\n";
$group->display_html("standard");
print "\n<HR>\n";
if ( $problems ) {
foreach my $group ( $badgroups->groups() ) {
- my $name = $group->name();
- print "<p><a href=\"$main::WWWSPONG/group/$name\"><b>"
+ my $name = $main::GROUPS{$group->name()}->{'name'};
+ print "<b>"
if $type eq "html";
- print "Group: $name\n";
- print "</b></a><p>" if $type eq "html";
+ print "<strong>Group: $name</strong>\n";
+ print "</b><p>" if $type eq "html";
$group->display( $type, $format );
+ print "<hr align=left width=25%>\n";
}
} else {
if( $format eq "full" ) {