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
|
||||
|
|
|
@ -41,7 +41,7 @@ import qualified Control.Concurrent.MSemN as MSemN
|
|||
import System.Posix.Process (getProcessGroupIDOf)
|
||||
import System.Posix.Signals (signalProcessGroup, sigTERM, sigKILL)
|
||||
#else
|
||||
import System.Win32.Process (terminateProcessId)
|
||||
import System.Win32.Process (terminateProcessById)
|
||||
#endif
|
||||
|
||||
type TransferGenerator = Assistant (Maybe (Transfer, TransferInfo, Transferrer -> Assistant ()))
|
||||
|
@ -270,7 +270,7 @@ cancelTransfer pause t = do
|
|||
threadDelay 50000 -- 0.05 second grace period
|
||||
signal sigKILL
|
||||
#else
|
||||
terminateProcessId pid
|
||||
terminateProcessById pid
|
||||
#endif
|
||||
|
||||
{- Start or resume a transfer. -}
|
||||
|
|
|
@ -14,7 +14,7 @@ import Utility.PID
|
|||
#ifndef mingw32_HOST_OS
|
||||
import Utility.LogFile
|
||||
#else
|
||||
import System.Win32.Process (terminateProcessId)
|
||||
import System.Win32.Process (terminateProcessById)
|
||||
import Utility.LockFile
|
||||
#endif
|
||||
|
||||
|
@ -162,7 +162,7 @@ stopDaemon pidfile = go =<< checkDaemon pidfile
|
|||
#ifndef mingw32_HOST_OS
|
||||
signalProcess sigTERM pid
|
||||
#else
|
||||
terminateProcessId pid
|
||||
terminateProcessById pid
|
||||
#endif
|
||||
|
||||
{- Windows locks a lock file that corresponds with the pid of the process.
|
||||
|
|
Loading…
Reference in a new issue