--- a/gameServer/Actions.hs Sun May 15 18:10:01 2011 +0400
+++ b/gameServer/Actions.hs Sun May 15 18:16:13 2011 +0400
@@ -475,11 +475,12 @@
processAction RestartServer = do
sock <- gets (fromJust . serverSocket . serverInfo)
+ args <- gets (runArgs . serverInfo)
io $ do
noticeM "Core" "Closing listening socket"
sClose sock
noticeM "Core" "Spawning new server"
- _ <- createProcess (proc "./hedgewars-server" [])
+ _ <- createProcess (proc "./hedgewars-server" args)
return ()
processAction $ ModifyServerInfo (\s -> s{shutdownPending=True})