---- Changes since 1.340 ----
Fixed bad table indentation on some browsers.
Changed link colors to be darker.
+---- Changes since 1.400 ----
+Display system uptime in the right frame after logging in.
right_quota=Disk usage and quota
right_header5=Account Information
right_uquota=Disk quota and usage
-right_time=Time on server
-
-
+right_time=Time on system
+right_uptime=System uptime
+right_updays=$1 days, $2 hours, $3 minutes
+right_uphours=$1 hours, $2 minutes
+right_upmins=$1 minutes
print "<tr> <td><b>$text{'right_time'}</b></td>\n";
print "<td>$tm</td> </tr>\n";
+ # System uptime
+ $out = &backquote_command("uptime");
+ $uptime = undef;
+ if ($out =~ /up\s+(\d+)\s+days,\s+(\d+):(\d+)/) {
+ # up 198 days, 2:06
+ $uptime = &text('right_updays', int($1), int($2), int($3));
+ }
+ elsif ($out =~ /up\s+(\d+):(\d+)/) {
+ $uptime = &text('right_uphours', int($1), int($2));
+ }
+ elsif ($out =~ /up\s+(\d+)\s+mins/) {
+ $uptime = &text('right_upmins', int($1));
+ }
+ if ($uptime) {
+ print "<tr> <td><b>$text{'right_uptime'}</b></td>\n";
+ print "<td>$uptime</td> </tr>\n";
+ }
+
# Load and memory info
if (&foreign_check("proc")) {
&foreign_require("proc", "proc-lib.pl");