terminateProcessId renamed
win32 upstream suggested a better name
This commit is contained in:
parent
0ae2ac282e
commit
584dbfb892
3 changed files with 6 additions and 6 deletions
|
@ -27,7 +27,7 @@ import Control.Concurrent
|
|||
#ifndef mingw32_HOST_OS
|
||||
import System.Posix (signalProcess, sigTERM)
|
||||
#else
|
||||
import System.Win32.Process (terminateProcessId)
|
||||
import System.Win32.Process (terminateProcessById)
|
||||
#endif
|
||||
import Network.URI
|
||||
|
||||
|
@ -59,7 +59,7 @@ terminateSelf =
|
|||
#ifndef mingw32_HOST_OS
|
||||
signalProcess sigTERM =<< getPID
|
||||
#else
|
||||
terminateProcessId =<< getPID
|
||||
terminateProcessById =<< getPID
|
||||
#endif
|
||||
|
||||
runRestart :: Assistant URLString
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue