Delay in item appearing after "equipped"?

I made a character customizer. When a player clicks the button "wear", it equips an accessory/shirt or pant onto their character. When this happens, a separate GUI called "Inventory" (that is already visible) is supposed to make that item appear in a box so that the player may be able to delete it if they'd like. (deleting the accessory/shirt or pant off their character). The problem is, there is a delay in this action. Only after the player equips another item does it show the one before it. I attempted to fix it but messed up the script -- help?

--inventory
local plr=game.Players.LocalPlayer;repeat wait() until plr.Character
local character=plr.Character
local wear=game.ReplicatedStorage:WaitForChild'Wear'

local inv=script.Parent:WaitForChild'Menus':WaitForChild'Inventory'
local cont=inv:WaitForChild'Container'
local footer=inv:WaitForChild'Footer'
local prev=footer:WaitForChild'prev':WaitForChild'ImageButton'
local nex=footer:WaitForChild'nex':WaitForChild'ImageButton'
local page=footer:WaitForChild'page'
local ex=inv:WaitForChild'Example'
local maxPages=1
local curPage=1

local char = plr.Character
local catChar=nil
local rot=0
local tim = tick()
local curAnim = nil
local run=game:GetService('RunService')
local input=game:GetService'UserInputService'
local mouseCnn={}
local deviceT="MouseButton1Down"
local ghost = {}

function setPage()
	page.Text=curPage.."/"..maxPages
end

function loadModel()
	char.Archivable = true
	local clo = char:Clone()
	local mouseDown=false
	local lastX=0
	local x,e=pcall(function()
		for a,d in pairs(clo:GetChildren()) do
			if (d:IsA'Script' or d:IsA'BillboardGui' or d:IsA'ForceField') and d.Name~="Animate" then
				d:Destroy()
			end
		end
		for a,d in pairs (clo.Head:GetChildren()) do
			if d:IsA'Sound' then
				d:Stop()
			end
		end
		local torso = clo:FindFirstChild'Torso' or clo:FindFirstChild'UpperTorso'
		local function makeGhost()
			for a,d in pairs(clo:GetChildren()) do
				if d:IsA'BasePart' then
					d.CanCollide = false
				end
			end
		end
		for a,d in pairs(mouseCnn) do
			d:Disconnect()
			table.remove(mouseCnn,a)
		end
		mouseCnn[1]=input.InputBegan:connect(function(i)
			if i.UserInputType==Enum.UserInputType.MouseButton1 then
				if i.UserInputState==Enum.UserInputState.Begin then
					local loc=input:GetMouseLocation()
					if loc.X>=cont.AbsolutePosition.X+cont.AbsoluteSize.X then
						lastX=loc.X
						mouseDown=true
					end
				end
			end
		end)
		mouseCnn[2]=input.InputEnded:connect(function(i)
			if i.UserInputType==Enum.UserInputType.MouseButton1 then
				if i.UserInputState==Enum.UserInputState.End then
					mouseDown=false
				end
			end
		end)
		mouseCnn[3]=input.InputChanged:connect(function(i)
			if i.UserInputType==Enum.UserInputType.MouseMovement then
				if mouseDown then
					rot=(rot+((i.Position.X-lastX)/2)) % 360
					lastX=i.Position.X
				end
			end
		end)
		for a,d in pairs(ghost) do
			d:Disconnect()
			table.remove(ghost,a)
		end
		ghost={game:GetService('RunService').Stepped:connect(function()
			makeGhost()
		end),
		torso.Changed:connect(function()
			makeGhost()
		end)}
		
		
		local function doRot()
			local ray=workspace.CurrentCamera:ScreenPointToRay(cont.AbsoluteSize.X+cont.AbsolutePosition.X+100,((cont.AbsoluteSize.Y/yOff)+cont.AbsolutePosition.Y),10)
			local view = workspace.CurrentCamera.ViewportSize
			clo:SetPrimaryPartCFrame(CFrame.new(ray.Origin, ray.Origin + workspace.CurrentCamera.CFrame.lookVector)*CFrame.fromEulerAnglesXYZ(0,math.rad(rot),0))
		end
		doRot()
		clo.Parent=workspace.CurrentCamera
		run:BindToRenderStep("Bind",Enum.RenderPriority.Camera.Value,function()
			if tick()-tim>5 then
				tim=tick()
				local anim = clo.Animate:GetChildren()[math.random(1,#clo.Animate:GetChildren())]:GetChildren()[1]
				if curAnim ~= nil then curAnim:Stop() curAnim:Destroy() end		
				curAnim = clo.Humanoid:LoadAnimation(anim)
				curAnim:Play(.5)
			end
			doRot()
			if not mouseDown then
				rot=(rot+1)%360
			end
		end)
	end) if not x then print(e) end
	catChar=clo
end

function desModel()
	if catChar then
		pcall(function()
			run:UnbindFromRenderStep("Bind")
			catChar:Destroy()
		end)
		catChar=nil
	end
end

function wearing()
	cont:ClearAllChildren()
	local items={};for a,d in pairs(character:GetChildren()) do if d:IsA'Shirt' or d:IsA'Pants' or d:IsA'Accoutrement' or d:IsA'CharacterMesh' then table.insert(items,d) end end
	local pos=0
	local rpos=0	
	local tab={}
	local temp=cont.AbsoluteSize.X
	local temp2=cont.AbsoluteSize.Y
	local xslots=math.floor(cont.AbsoluteSize.X/75)
	local yslots=math.ceil((cont.AbsoluteSize.Y)/90)
	temp=temp-((xslots*10))
	temp2=temp2-((yslots*10))
	xslots=math.floor(temp/75)
	yslots=math.floor(temp2/90)
	local rows=math.ceil(#items/xslots)
	local pages=math.ceil(rows/yslots)
	maxPages=pages
	curPage=1
	for a=1,pages do
		local frm=Instance.new("Frame",cont)
		frm.Size=UDim2.new(1,0,1,0)
		frm.BackgroundTransparency=1
		frm.Name=tostring(a)
		if a==1 then frm.Visible=true else frm.Visible=false end
		for l=1,yslots do
			for i=1,xslots do
			if #tab~=#items then
			local fr=ex:Clone()
			table.insert(tab,fr)
			local texture; 
			if items[#tab]:findFirstChild'AssetId' then 
				texture="http://www.roblox.com/Thumbs/Asset.ashx?width=110&height=110&assetId="..items[#tab].AssetId.Value
			elseif items[#tab]:IsA'Accoutrement' then
				texture="http://www.roblox.com/Thumbs/Asset.ashx?width=110&height=110&assetId="..items[#tab].Handle.Mesh.MeshId:match("%d+")
			elseif items[#tab]:IsA'Shirt' or items[#tab]:IsA'Pants' then
				texture="http://www.r5oblox.com/Thumbs/Asset.ashx?width=110&height=110&assetId="..tonumber(items[#tab][items[#tab].Name.."Template"]:match("%d+"))+1
			else
				texture="http://www.roblox.com/asset/?id=346014646" 
			end
			fr.itm_img.Image=texture
			fr.lim_name.Text=items[#tab].Name
			fr.Parent=frm
			fr.Name=items[#tab].Name
			fr.Position=UDim2.new(0,pos+(i*10),0,rpos+(l*10))
			fr.Visible=true
			local itm_img=fr.itm_img
			itm_img.MouseButton1Down:connect(function()
				--Nothing?
			end)
			fr:WaitForChild'TextButton'.MouseButton1Down:connect(function()
				wear:InvokeServer(fr.Name)
				desModel()
				loadModel()
			end)
			pos=pos+75
			end
		end
		pos=0
		rpos=rpos+90
		end
		pos=0
		rpos=0
	end
	footer.page.Text="PAGE"..curPage.."/"..maxPages
end

function turning()
	for a,d in pairs(cont:GetChildren()) do
		d.Visible=false
	end
	cont[tostring(curPage)].Visible=true
	footer.page.Text="PAGE "..curPage.."/"..maxPages
end

footer.prev.ImageButton.MouseButton1Down:connect(function()
	if curPage>1 then
		curPage=curPage-1
		turning()
	end
end)
footer.nex.ImageButton.MouseButton1Down:connect(function()
	if curPage<maxPages then
		curPage=curPage+1
		turning()
	end
end)

wearing()

character.ChildAdded:connect(function()
	wearing()
end)
character.ChildRemoved:connect(function(c)
	if catChar then
		if catChar:findFirstChild(c.Name,true) then
			catChar:findFirstChild(c.Name,true):Destroy()
		end
	end
	wearing()
end)

inv.Changed:connect(function(p)
	if p=="Visible" then
		if inv.Visible==true then
			loadModel()
		else
			desModel()
		end
	end
end)