webapp: Fix zombie xdg-open process left when opening file browser. Closes: #785498
This commit is contained in:
parent
e9172263e5
commit
6ec7c4fef4
2 changed files with 5 additions and 2 deletions
|
@ -132,8 +132,9 @@ openFileBrowser = do
|
|||
#endif
|
||||
ifM (liftIO $ inPath cmd)
|
||||
( do
|
||||
let run = void $ liftIO $ forkIO $ void $
|
||||
createProcess p
|
||||
let run = void $ liftIO $ forkIO $ do
|
||||
(Nothing, Nothing, Nothing, pid) <- createProcess p
|
||||
void $ waitForProcess pid
|
||||
run
|
||||
#ifdef mingw32_HOST_OS
|
||||
{- On windows, if the file browser is not
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue