gameServer/Actions.hs
changeset 4960 3b54b1c9b768
parent 4959 09f4978b4fb0
child 4962 705c6186ad9d
--- a/gameServer/Actions.hs	Thu Feb 24 22:01:36 2011 +0300
+++ b/gameServer/Actions.hs	Sun Feb 27 19:32:14 2011 +0300
@@ -416,6 +416,6 @@
 
 processAction (RestartServer force) = do
     if force then do
-        io $ throwIO ShutdownException
+        throw ShutdownException
         else
         processAction $ ModifyServerInfo (\s -> s{restartPending=True})