add Give Exploration devmode option

OpenRA.Game/Traits/Player/DeveloperMode.cs

@@ -86,6 +86,12 @@ namespace OpenRA.Traits
 						if (self.World.LocalPlayer == self.Owner)
 							Game.Settings.Debug.ShowCollisions ^= true;
 						break;
+					}
+				case "DevGiveExploration":
+					{
+						if (self.World.LocalPlayer == self.Owner)
+							self.World.WorldActor.Trait<Shroud>().ExploreAll(self.World);
+						break;
 					}
 			}
 		}

OpenRA.Game/Widgets/Delegates/DeveloperModeDelegate.cs

@@ -92,6 +92,12 @@ namespace OpenRA.Widgets.Delegates
 			{
 				Game.IssueOrder(new Order("DevEnableTech", Game.world.LocalPlayer.PlayerActor));
 				return true;
+			};
+
+			devmodeBG.GetWidget<ButtonWidget>("GIVE_EXPLORATION").OnMouseUp = mi =>
+			{
+				Game.IssueOrder(new Order("DevGiveExploration", Game.world.LocalPlayer.PlayerActor));
+				return true;
 			};
 				
 			devModeButton.IsVisible = () => { return Game.LobbyInfo.GlobalSettings.AllowCheats; };