Fix some errors with Hall of Fame

This commit is contained in:
JappaWakka 2024-02-21 18:04:10 +01:00
parent 86d6f706e9
commit 542d1084e0
1 changed files with 1 additions and 1 deletions

View File

@ -175,7 +175,7 @@
Case "halloffame" Case "halloffame"
If argument <> "" Then If argument <> "" Then
If argument.Contains(",") = False Then If argument.Contains(",") = False Then
If StringHelper.IsNumeric(argument) Then If argument.EndsWith(".dat") = False Then
Core.SetScreen(New TransitionScreen(Core.CurrentScreen, New HallOfFameScreen(Core.CurrentScreen, int(argument)), Color.Black, False)) Core.SetScreen(New TransitionScreen(Core.CurrentScreen, New HallOfFameScreen(Core.CurrentScreen, int(argument)), Color.Black, False))
Else Else
Core.SetScreen(New TransitionScreen(Core.CurrentScreen, New HallOfFameScreen(Core.CurrentScreen, argument), Color.Black, False)) Core.SetScreen(New TransitionScreen(Core.CurrentScreen, New HallOfFameScreen(Core.CurrentScreen, argument), Color.Black, False))