diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-11-20 14:39:26 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-11-20 14:50:36 -0400 |
| commit | 8e28135b26db1c920ebde7438db9bad87d3026ee (patch) | |
| tree | 68d948ce454ea0661dbf11416d3e26182e3447af /Assistant | |
| parent | 513d36ae4de0be74b12112487d8e1b12b7c7f43e (diff) | |
remotedaemon: Fork to background by default. Added --foreground switch to enable old behavior.
Groundwork for tor hidden services, which the remotedaemon will serve.
Diffstat (limited to 'Assistant')
| -rw-r--r-- | Assistant/Threads/RemoteControl.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/RemoteControl.hs b/Assistant/Threads/RemoteControl.hs index 447b493c6..1aa8bc9c8 100644 --- a/Assistant/Threads/RemoteControl.hs +++ b/Assistant/Threads/RemoteControl.hs @@ -30,7 +30,7 @@ remoteControlThread :: NamedThread remoteControlThread = namedThread "RemoteControl" $ do program <- liftIO programPath (cmd, params) <- liftIO $ toBatchCommand - (program, [Param "remotedaemon"]) + (program, [Param "remotedaemon", Param "--foreground"]) let p = proc cmd (toCommand params) (Just toh, Just fromh, _, pid) <- liftIO $ createProcess p { std_in = CreatePipe |