diff -r 9075d7effdf2 -r 705c6186ad9d gameServer/hedgewars-server.hs --- a/gameServer/hedgewars-server.hs Sun Feb 27 19:32:44 2011 +0300 +++ b/gameServer/hedgewars-server.hs Sun Feb 27 20:15:09 2011 +0300 @@ -7,6 +7,7 @@ import Control.Concurrent.Chan import qualified Control.Exception as E import System.Log.Logger +import System.Process ----------------------------------- import Opts import CoreTypes @@ -43,7 +44,7 @@ handleRestart :: ShutdownException -> IO () handleRestart ShutdownException = return () handleRestart RestartException = do - + _ <- createProcess (proc "./hedgewars-server" []) return () main :: IO ()