--- a/gameServer/Actions.hs	Tue Jan 28 09:09:31 2014 -0500
+++ b/gameServer/Actions.hs	Tue Jan 28 22:29:21 2014 +0400
@@ -717,7 +717,7 @@
         filterM (client'sM rnc (isJust . checkInfo)) allci
 
     (cinfo, l) <- io $ loadReplay (fromIntegral p) blackList
-    when (not . null $ l) $
+    when (isJust cinfo) $
         mapM_ processAction [
             AnswerClients [c] ("REPLAY" : l)
             , ModifyClient $ \c -> c{checkInfo = cinfo, isReady = False}