mount cast often delayed after combat

[Pingumania]

While leveling the mount cast is often delayed after combat. For example combat is over and the combat symbol is gone but mountme is only able to cast the mount after additional ~3 seconds.

My workaround (comment line 341 and 343 out)

function GetAction()
		local combat = UnitAffectingCombat("player")

		local classAction
		for i = 1, #ClassActionIDs do
			local id = ClassActionIDs[i]
			if IsPlayerSpell(id) and not (ClassActionBlocked[id] and ClassActionBlocked[id](combat)) then
				classAction = GetSpellInfo(id)
				break
			end
		end

		local moving = IsPlayerMoving()
		if classAction and (moving or combat) then
			return "/cast [nomounted,novehicleui] " ..   classAction
		elseif not moving then
			local action
			// if SecureCmdOptionParse(MOUNT_CONDITION) then
				action = GetMount()
			// end
			if classAction and PLAYER_CLASS == "WARLOCK" then
				-- TODO: why is /cancelform in here???
				action = "/cancelaura " ..   classAction ..   (action and ("\n/cancelform [form]\n" ..   action) or "")
			end
			return action
		end
	end