Changes for issue #123 (Pass 1)

This commit is contained in:
MikeMaximus
2018-02-18 09:38:52 -06:00
parent e897fda8e8
commit 1c54085d6c
8 changed files with 35 additions and 26 deletions
+2 -2
View File
@@ -85,13 +85,13 @@ Public Class mgrMonitorList
Select Case eListType
Case eListTypes.FullList
'Don't wrap this, if it fails there's a problem with the database
hshList.Add(oGame.ProcessName & ":" & oGame.Name, oGame)
hshList.Add(oGame.ProcessName & ":" & oGame.SafeName, oGame)
Case eListTypes.ScanList
For Each de As DictionaryEntry In hshList
oCompareGame = DirectCast(de.Value, clsGame)
If Regex.IsMatch(oGame.ProcessName, oCompareGame.ProcessName) Or (oGame.ProcessName = oCompareGame.ProcessName) Then
DirectCast(hshList.Item(oCompareGame.ProcessName), clsGame).Duplicate = True
oGame.ProcessName = oGame.ProcessName & ":" & oGame.Name
oGame.ProcessName = oGame.ProcessName & ":" & oGame.SafeName
oGame.Duplicate = True
End If
Next