$message";
- }
-
- my $status = "";
- my $status_color = "";
- if ( -e "${General::swroot}/uptime/enabled" ){
- $status_color = $Header::colourgreen;
- $status = $Lang::tr{'running'};
- } else {
- $status_color = $Header::colourred;
- $status = $Lang::tr{'stopped'};
- }
-
- print <
- Uptime Client: |
-
-
-
- |
- $status |
-
-
-
-END
-;
-&Header::closebox();
-&Header::closebigbox();
-&Header::closepage();
-
-############################################################################################################################
-############################################################################################################################
-
-sub save_configuration {
- # A small helper to create our configurationfile
- &General::writehash("${General::swroot}/uptime/settings", \%uptimesettings);
- if ($uptimesettings{'PROXY'} == "on"){ $uptimesettings{'PROXY'} = "yes";}
- if ($uptimesettings{'PROXY'} == "off"){ $uptimesettings{'PROXY'} = "no";}
- open( FILE, "> $uptimefile" ) or die "Unable to write $uptimefile";
- print FILE < |