Index: openacs-4/packages/acs-admin/www/monitor.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/monitor.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-admin/www/monitor.tcl	27 Oct 2014 16:38:51 -0000	1.3
+++ openacs-4/packages/acs-admin/www/monitor.tcl	7 Aug 2017 23:47:45 -0000	1.4
@@ -65,10 +65,19 @@
 
 set distinct [array size ip_p]
 
-# run standard Unix uptime command to get load average (crude measure of 
-# system health)
+# run standard GNU uptime command to get load average (crude measure
+# of system health).
+if {[set uptime [util::which uptime]] eq ""} {
+    error "'uptime' command not found on the system"
+}
 
-if [catch { set uptime_output [exec /usr/bin/uptime] } errmsg] {
+if {[catch { set uptime_output [exec $uptime] } errmsg]} {
    # whoops something wrong with uptime (check path)
    set uptime_output "ERROR running uptime, check path in script"
 }
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: