Index: openacs-4/packages/xotcl-request-monitor/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/index.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/xotcl-request-monitor/www/index.tcl 30 Dec 2005 00:07:23 -0000 1.2 +++ openacs-4/packages/xotcl-request-monitor/www/index.tcl 28 Sep 2006 08:55:29 -0000 1.3 @@ -34,7 +34,9 @@ # collect current system statistics proc currentSystemLoad {} { - return [exec "/usr/bin/uptime"] + if {[catch {return [exec "/usr/bin/uptime"]}]} { + return "" + } } # collect current response time (per minute and hour) @@ -265,4 +267,4 @@ set active_user_string "$active_users_10 users $active_community_string active in last 10 minutes, $activeUsers24 in last $::server_running ($activeTotal24 total)" set jsGraph [expr {!$jsGraph}] set toggle_graphics_url [export_vars -base [ad_conn url] {jsGraph}] -set jsGraph [expr {!$jsGraph}] \ No newline at end of file +set jsGraph [expr {!$jsGraph}] Index: openacs-4/packages/xotcl-request-monitor/www/stat-details.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-request-monitor/www/stat-details.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/xotcl-request-monitor/www/stat-details.tcl 17 Aug 2006 01:32:27 -0000 1.2 +++ openacs-4/packages/xotcl-request-monitor/www/stat-details.tcl 28 Sep 2006 08:55:29 -0000 1.3 @@ -55,7 +55,7 @@ -tooltip "Delete URL Statistics" }] \ -columns { - Field url -label "Request" -orderby url + AnchorField url -label "Request" -orderby url Field totaltime -label "Total Time" -html { align right } -orderby totaltime Field cnt -label "Count" -html { align right } -orderby cnt Field avg -label "Ms" -html { align right } -orderby avg @@ -81,6 +81,7 @@ if {$exclude} continue } t1 add -url [string_truncate_middle -len 80 $url] \ + -url.href "[ad_url]$url" \ -totaltime [lindex $l 1] \ -cnt [lindex $l 2] \ -avg $avg \