mirror/min-ed-launcher
3
0
Fork 0
mirror of https://github.com/rfvgyhn/min-ed-launcher.git synced 2026-02-04 09:05:28 +00:00
Code Issues Projects Releases Wiki Activity

remove broken isRunning check

Browse Source 
didn't fix since running multiple instances of the game is used by some users
This commit is contained in:
Chris
2024-06-20 15:45:03 -06:00
parent da63419874
commit 32cf0c9204
1 changed files with 10 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
src/MinEdLauncher/Product.fs
View File

@ -247,18 +247,6 @@ let validateForRun launcherDir watchForCrashes (product: ProductDetails) =
Mode = product.VInfo.Mode
ServerArgs = product.ServerArgs }
let isRunning (product:RunnableProduct) =
let exeName = product.Executable.Name
if RuntimeInformation.IsOSPlatform(OSPlatform.Windows) then
Process.GetProcessesByName(exeName).Length > 0 // TODO: check that this is true when running on Windows
else
Process.GetProcesses() // When running via wine, process name can be truncated and the main module is wine so check all module names
|> Array.exists (fun p ->
p.Modules
|> Seq.cast<ProcessModule>
|> Seq.exists (fun m -> m.ModuleName = exeName))
let createProcessInfo proton args product =
let fileName, arguments =
match proton with
@ -279,17 +267,14 @@ let createProcessInfo proton args product =
type RunResult = Ok of Process | AlreadyRunning | DryRun of ProcessStartInfo | Error of exn
let run dryRun proton args (product:RunnableProduct) =
if isRunning product then
AlreadyRunning
let startInfo = createProcessInfo proton args product
Log.debug $"Process: %s{startInfo.FileName} %s{startInfo.Arguments}"
if dryRun then
DryRun startInfo
else
let startInfo = createProcessInfo proton args product
Log.debug $"Process: %s{startInfo.FileName} %s{startInfo.Arguments}"
if dryRun then
DryRun startInfo
else
try
Process.Start(startInfo) |> Ok
with
| e -> Error e
try
Process.Start(startInfo) |> Ok
with
| e -> Error e