Fixed bug with localization tokens (description)

When returning to the main menu, the localization tokens were not getting reset to their default values.

P3D/HelperClasses/Localization.vb

@@ -42,7 +42,7 @@
         Logger.Debug("---Reloaded GameMode Tokens---")
     End Sub
 
-    Private Shared Sub LoadTokenFile(ByVal path As String, ByVal IsGameModeFile As Boolean)
+    Public Shared Sub LoadTokenFile(ByVal path As String, ByVal IsGameModeFile As Boolean)
         Dim fullpath As String = GameController.GamePath & path
         Dim tokenFullpath As String = fullpath & "Tokens_" & LanguageSuffix & ".dat"
 

P3D/Player/Player.vb

@@ -521,10 +521,8 @@
 
         If GameModeManager.GameModeExists(GameMode) = False Then
             GameMode = "Kolben"
-            GameModeManager.SetGameModePointer("Kolben")
-        Else
-            GameModeManager.SetGameModePointer(GameMode)
         End If
+        GameModeManager.SetGameModePointer(GameMode)
 
         BattleSystem.GameModeAttackLoader.Load()
 

P3D/Screens/MainMenu/PauseScreen.vb

@@ -295,6 +295,8 @@
         End If
         Chat.ClearChat()
         ScriptStorage.Clear()
+        GameModeManager.SetGameModePointer("Kolben")
+        Localization.LoadTokenFile(GameModeManager.ActiveGameMode.LocalizationsPath, False)
         Core.SetScreen(New PressStartScreen())
         Core.Player.loadedSave = False
     End Sub