diff -r 09f4978b4fb0 -r 3b54b1c9b768 gameServer/Actions.hs --- 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})