How would I equip an accessory from a script?

I am attempting to make A GUI that replaces a player current hat with a one I made. I made the GUI and other functions work fine but for some reason cannot get the hat to equip. I am able to remove the accessory and clone it to the player but for some reason the cloned hat shown umovable in the current workspace on not equiped on the player. I get no error either. What do you think?

function EquipItem()
	player.Character:WaitForChild("Humanoid"):RemoveAccessories()
	wait()
	local hatClone = BaseballCap:Clone()
	hatClone.Name = "BaseballCapClone"
	player.Character:WaitForChild("Humanoid"):AddAccessory(hatClone)
end