function GM:UpdateAdminPanel()

	spawnmenu.AddContext( "Utilities", "MelonRacer", "MelonRacer", "Melonracer admin options")
	local cp = GetControlPanel( "MelonRacer" )

	print("panel created")

	if ( cp ) then
		print("panel created 2")
		cp:ClearControls()
		cp:AddHeader()
		cp:AddControl( "Label", { Text = "Melonracer Admin Options" } )

		local params =  {
				Label = "#Melon_Speed",
				Type = "Integer",
				Min = "0",function GM:UpdateAdminPanel()

	spawnmenu.AddContext( "Utilities", "MelonRacer", "MelonRacer", "Melonracer admin options")
	local cp = GetControlPanel( "MelonRacer" )

	print("panel created")

	if ( cp ) then
		print("panel created 2")
		cp:ClearControls()
		cp:AddHeader()
		cp:AddControl( "Label", { Text = "Melonracer Admin Options" } )

		local params =  {
				Label = "#Melon_Speed",
				Type = "Integer",
				Min = "100",
				Max = "1000",
				Command = "mr_maxspeed",
				}

		cp:AddControl( "Slider", params )

		local params =	{
				Text = "#Track Edit",
				Command = "mr_editmode"
				}

		cp:AddControl( "CheckBox", params )
	end
end
				Max = "1000",
				Command = "mr_maxspeed",
				}

		cp:AddControl( "Slider", params )

		local params =	{
				Text = "#Track Edit",
				Command = "mr_editmode"
				}

		cp:AddControl( "CheckBox", params )
	end
end