X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=clearadm%2Findex.cgi;h=4fc9cecb2eb27bdfbc9c8b36e2ea0ce94b06c383;hb=0c802537ec02d6cfea4c41b3138535c09a319489;hp=a5259ea8f09aacb8c793fddb51c424a20104ce7c;hpb=81cbd130706633b1c19ff59371c2ef61d80c562b;p=clearscm.git diff --git a/clearadm/index.cgi b/clearadm/index.cgi index a5259ea..4fc9cec 100755 --- a/clearadm/index.cgi +++ b/clearadm/index.cgi @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/local/bin/perl =pod @@ -49,8 +49,8 @@ use lib "$FindBin::Bin/lib", "$FindBin::Bin/../lib"; use ClearadmWeb; use Clearadm; -#use Clearcase; -#use Clearcase::Views; +use Clearcase; +use Clearcase::Views; use Display; use Utils; @@ -134,6 +134,8 @@ foreach (@systems) { $data .= '' if $system{active} eq 'false'; + $load{uptime} ||= 'Unknown'; + display td {class => 'dataCentered'}, "$data ", font {class => 'dim' }, "
Up: $load{uptime}"; } # foreach @@ -203,4 +205,4 @@ Please report problems to Andrew DeFaria . Copyright (c) 2010, ClearSCM, Inc. All rights reserved. -=cut \ No newline at end of file +=cut