def_setting marktime {
set mt [nickdb_get $n marktime]
set p $mt
- if {[string match $mt {[0-9]*}} { append p s }
+ if {[string match {[0-9]*} $mt]} { append p s }
append p ": "
append p [marktime_desc $mt]
return $p
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
}
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"