gameServer/Actions.hs
changeset 5210 a5329e52a71b
parent 5209 f7a610e2ef5f
child 5211 8ebf92014447
--- 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})