# HG changeset patch # User unc0rr # Date 1231440691 0 # Node ID 03d099ace39bc2e5d751dcdd81b712df35cd6cf5 # Parent 8244c5e370ff1012a20e965aec36ecdc258b204d Update notifier diff -r 8244c5e370ff -r 03d099ace39b netserver/HWProto.hs --- a/netserver/HWProto.hs Thu Jan 08 18:46:10 2009 +0000 +++ b/netserver/HWProto.hs Thu Jan 08 18:51:31 2009 +0000 @@ -108,7 +108,7 @@ else "
Private server
" - updateInfo = if protocol client < 21 then "Hedgewars 0.9.8 is out!!! Please, update. Support for 0.9.7 will be dropped in a month.
" else "" + updateInfo = if protocol client < 21 then "Hedgewars 0.9.8 is out!!! Please, update. Support for 0.9.7 will be dropped in a month.
" ++ (show $ length nicks) ++ " clients in: " ++ clientslist ++ "
" else [] clientslist = if not $ null nicks then foldr1 (\a b -> a ++ ", " ++ b) nicks else "" lastHour serverInfo =