Colourize the network with the proper colour.
Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>
unless (-f "$ignoredfile") { &IDS::create_empty_file($ignoredfile); }
unless (-f "$whitelistfile" ) { &IDS::create_empty_file($whitelistfile); }
unless (-f "$ignoredfile") { &IDS::create_empty_file($ignoredfile); }
unless (-f "$whitelistfile" ) { &IDS::create_empty_file($whitelistfile); }
+# Hash which contains the colour code of a network zone.
+my %colourhash = (
+ 'red' => $Header::colourred,
+ 'green' => $Header::colourgreen,
+ 'blue' => $Header::colourblue,
+ 'orange' => $Header::colourorange
+);
+
&Header::showhttpheaders();
#Get GUI values
&Header::showhttpheaders();
#Get GUI values
}
print "<td class='base' width='25%'>\n";
}
print "<td class='base' width='25%'>\n";
- print "<input type='checkbox' name='ENABLE_IDS_$zone_upper' $checked_input>$Lang::tr{$zone}\n";
+ print "<input type='checkbox' name='ENABLE_IDS_$zone_upper' $checked_input>\n";
+ print " $Lang::tr{'enabled on'}<font color='$colourhash{$zone}'> $Lang::tr{$zone}</font>\n";