Use correct settings when Time passes. regsub away *all* the ,s in load.

diff --git a/bot.tcl b/bot.tcl
index e5da8469d8306eb4f2c417daea7776c5f9bbf07f..0733d2c3fb5470eb89b0a6feae8c9d553da5d868 100755 (executable)
--- a/bot.tcl
+++ b/bot.tcl
@@ -1603,6 +1603,8 @@ proc lnick_marktime_start {luser why ms} {
 
 proc lnick_marktime_now {luser why} {
     upvar #0 nick_onchans($luser) oc
+    global calling_nick
+    set calling_nick $luser
     sendprivmsg $luser [lnick_pingstring $why $oc ""]
     lnick_marktime_reset $luser
 }    
@@ -1614,7 +1616,7 @@ proc lnick_pingstring {why oc apstring} {
     if {[regexp \
  {^ *([0-9:apm]+) +up.*, +(\d+) users, +load average: +([0-9., ]+) *$} \
             $uptime dummy time users load]} {
-       regsub , $load {} load
+       regsub -all , $load {} load
         set uptime "$time  $nnicks/$users  $load"
     } else {
        append uptime ", $nnicks nicks"