Improved unsupported feature notices

Project/Views/Main Window Components/Blueprints/LocalModsListView.xojo_window

@@ -416,6 +416,15 @@ End
 
 	#tag Method, Flags = &h21
 		Private Sub RunModDiscovery()
+		  Var GameId As String = GameSelectorWindow.Present(Self)
+		  If GameId.IsEmpty Then
+		    Return
+		  End If
+		  If GameId <> Ark.Identifier Then
+		    Self.ShowAlert("Beacon does not support mod discovery for " + Language.GameName(GameId), "This feature may or may not be coming in the future.")
+		    Return
+		  End If
+
 		  Var Settings As Ark.ModDiscoverySettings = ArkModDiscoveryDialog.Present(Self)
 		  If Settings Is Nil Then
 		    Return
@@ -671,6 +680,9 @@ End
 		  Select Case Item.Name
 		  Case "RegisterMod"
 		    Var GameId As String = GameSelectorWindow.Present(Self)
+		    If GameId.IsEmpty Then
+		      Return
+		    End If
 		    If GameId <> Ark.Identifier Then
 		      Self.ShowAlert("Beacon does not yet support mods for " + Language.GameName(GameId), "This feature is coming, but isn't ready in this version.")
 		      Return

Project/Views/Main Window Components/Blueprints/RemoteModsListView.xojo_window

@@ -588,6 +588,9 @@ End
 		  Select Case Item.Name
 		  Case "RegisterMod"
 		    Var GameId As String = GameSelectorWindow.Present(Self)
+		    If GameId.IsEmpty Then
+		      Return
+		    End If
 		    If GameId <> Ark.Identifier Then
 		      Self.ShowAlert("Beacon does not yet support mods for " + Language.GameName(GameId), "This feature is coming, but isn't ready in this version.")
 		      Return

Project/Views/Main Window Components/Templates/TemplatesComponent.xojo_window

@@ -313,6 +313,9 @@ End
 	#tag Method, Flags = &h0
 		Sub NewTemplate()
 		  Var GameId As String = GameSelectorWindow.Present(Self)
+		  If GameId.IsEmpty Then
+		    Return
+		  End If
 		  Self.NewTemplate(GameId)
 		End Sub
 	#tag EndMethod