Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix wrong filter
authorunc0rr
Tue, 11 Nov 2008 15:44:27 +0000
changeset 1494 6e6baf165e0c
parent 1493 1e422bc5d863
child 1495 2b2b89bdb5f3
Fix wrong filter
netserver/hedgewars-server.hs file | annotate | diff | comparison | revisions 
--- a/netserver/hedgewars-server.hs	Mon Nov 10 19:44:54 2008 +0000
+++ b/netserver/hedgewars-server.hs	Tue Nov 11 15:44:27 2008 +0000
@@ -156,7 +156,7 @@
 			["MINUTELY"] -> do
 				currentTime <- getCurrentTime
 				let newServerInfo = serverInfo{
-						lastHourUsers = filter (\t -> currentTime `diffUTCTime` t > 3600) $ lastHourUsers serverInfo
+						lastHourUsers = filter (\t -> currentTime `diffUTCTime` t < 3600) $ lastHourUsers serverInfo
 						}
 				mainLoop newServerInfo acceptChan messagesChan clients rooms
hedgewars