From 2afcfafd28f54226b4fbfcacc20f5ace1d6a40a4 Mon Sep 17 00:00:00 2001
From: Darthpred <darthpred@gmail.com>
Date: Wed, 27 Jul 2016 19:17:38 +0300
Subject: [PATCH] New merchant skin style

---
 ElvUI_SLE/defaults/private.lua             |    1 +
 ElvUI_SLE/locales/english.lua              |    1 +
 ElvUI_SLE/locales/russian.lua              |    1 +
 ElvUI_SLE/options/skins_c.lua              |   10 +-
 ElvUI_SLE/skins/blizzard/load_blizzard.xml |    1 +
 ElvUI_SLE/skins/blizzard/merchant.lua      |    5 +-
 ElvUI_SLE/skins/blizzard/merchantList.lua  |  715 ++++++++++++++++++++++++++++
 7 files changed, 730 insertions(+), 4 deletions(-)
 create mode 100644 ElvUI_SLE/skins/blizzard/merchantList.lua

diff --git a/ElvUI_SLE/defaults/private.lua b/ElvUI_SLE/defaults/private.lua
index ae781e8..8ab7991 100644
--- a/ElvUI_SLE/defaults/private.lua
+++ b/ElvUI_SLE/defaults/private.lua
@@ -160,6 +160,7 @@ V["sle"] = {
 		},
 		["merchant"] = {
 			["enable"] = false,
+			["style"] = "Default",
 			["subpages"] = 2,
 		},
 	},
diff --git a/ElvUI_SLE/locales/english.lua b/ElvUI_SLE/locales/english.lua
index 1ae36c0..7f972a6 100644
--- a/ElvUI_SLE/locales/english.lua
+++ b/ElvUI_SLE/locales/english.lua
@@ -688,6 +688,7 @@ Ctrl + Left Click to collapce]]
 L["SLE_QUESTKING_Required"] = "  Required: "
 L["ElvUI Objective Tracker"] = true
 L["ElvUI Skins"] = true
+L["As List"] = true
 
 --Toolbars
 L["We are sorry, but you can't do this now. Try again after the end of this combat."] = true
diff --git a/ElvUI_SLE/locales/russian.lua b/ElvUI_SLE/locales/russian.lua
index c3c31be..a8c10be 100644
--- a/ElvUI_SLE/locales/russian.lua
+++ b/ElvUI_SLE/locales/russian.lua
@@ -679,6 +679,7 @@ L["Subpages are blocks of 10 items. This option set how many of subpages will be
 -- L["SLE_QUESTKING_Required"] = "  Required: "
 L["ElvUI Objective Tracker"] = "Список задач ElvUI"
 L["ElvUI Skins"] = "Скины ElvUI"
+L["As List"] = "Списком"
 
 --Toolbars
 L["We are sorry, but you can't do this now. Try again after the end of this combat."] = "Извините, но Вы не можете этого сделать сейчас. Попробуйте снова после окончания текущего боя."
diff --git a/ElvUI_SLE/options/skins_c.lua b/ElvUI_SLE/options/skins_c.lua
index ab6fd1f..f5bc7dc 100644
--- a/ElvUI_SLE/options/skins_c.lua
+++ b/ElvUI_SLE/options/skins_c.lua
@@ -337,13 +337,21 @@ local function configTable()
 						type = "toggle",
 						name = L["Enable"],
 					},
+					style = {
+						order = 2, type = "select",
+						name = L["Style"],
+						values = {
+							["Default"] = DEFAULT,
+							["List"] = L["As List"],
+						},
+					},
 					subpages = {
 						order = 2,
 						type = 'range',
 						name = L["Subpages"],
 						desc = L["Subpages are blocks of 10 items. This option set how many of subpages will be shown on a single page."],
 						min = 2, max = 5, step = 1,
-						disabled = function() return not E.private.sle.skins.merchant.enable end,
+						disabled = function() return not E.private.sle.skins.merchant.enable or E.private.sle.skins.merchant.style ~= "Default" end,
 					},
 				},
 			},
diff --git a/ElvUI_SLE/skins/blizzard/load_blizzard.xml b/ElvUI_SLE/skins/blizzard/load_blizzard.xml
index 58d7824..13eb219 100644
--- a/ElvUI_SLE/skins/blizzard/load_blizzard.xml
+++ b/ElvUI_SLE/skins/blizzard/load_blizzard.xml
@@ -3,4 +3,5 @@
 	<Script file='petbattle.lua'/>
 	<Script file='objectiveTracker.lua'/>
 	<Script file='merchant.lua'/>
+	<Script file='merchantList.lua'/>
 </Ui>
\ No newline at end of file
diff --git a/ElvUI_SLE/skins/blizzard/merchant.lua b/ElvUI_SLE/skins/blizzard/merchant.lua
index dfc1576..f153083 100644
--- a/ElvUI_SLE/skins/blizzard/merchant.lua
+++ b/ElvUI_SLE/skins/blizzard/merchant.lua
@@ -1,4 +1,4 @@
-local SLE, T, E, L, V, P, G = unpack(select(2, ...))
+local SLE, T, E, L, V, P, G = unpack(select(2, ...))
 local Sk = SLE:GetModule("Skins")
 local S = E:GetModule('Skins')
 --GLOBALS: CreateFrame, MERCHANT_ITEMS_PER_PAGE, BUYBACK_ITEMS_PER_PAGE, hooksecurefunc, MERCHANT_PAGE_NUMBER
@@ -214,9 +214,7 @@ local function RebuildMerchantFrame()
 	ItemsPerSubpage = MERCHANT_ITEMS_PER_PAGE
 	SubpagesPerPage = E.private.sle.skins.merchant.subpages
 	MERCHANT_ITEMS_PER_PAGE = SubpagesPerPage * 10 --Haven't seen this causing any taints so I asume it's ok
-	-- _G["MerchantFrame"]:SetWidth(60 + 330 * SubpagesPerPage)
 	_G["MerchantFrame"]:SetWidth(42 + (318 * SubpagesPerPage) + (12 * (SubpagesPerPage - 1)))
-	-- _G["MerchantFrame"]:SetWidth(690)
 
 	for i = 1, MERCHANT_ITEMS_PER_PAGE do
 		if (not _G["MerchantItem" .. i]) then
@@ -247,6 +245,7 @@ end
 
 local function MerchantSkinInit()
 	if E.private.skins.blizzard.enable ~= true or E.private.skins.blizzard.merchant ~= true or E.private.sle.skins.merchant.enable ~= true then return end
+	if E.private.sle.skins.merchant.style ~= "Default" then return end
 	RebuildMerchantFrame()
 	UpdateButtonsPositions()
 
diff --git a/ElvUI_SLE/skins/blizzard/merchantList.lua b/ElvUI_SLE/skins/blizzard/merchantList.lua
new file mode 100644
index 0000000..327b9d5
--- /dev/null
+++ b/ElvUI_SLE/skins/blizzard/merchantList.lua
@@ -0,0 +1,715 @@
+local SLE, T, E, L, V, P, G = unpack(select(2, ...))
+local Sk = SLE:GetModule("Skins")
+local S = E:GetModule('Skins')
+--GLOBALS: CreateFrame, hooksecurefunc, ChatFontSmall, UIParent, INVSLOT_FIRST_EQUIPPED, INVSLOT_LAST_EQUIPPED
+local _G = _G
+local strtrim = strtrim
+local GetLocale = GetLocale
+local HandleModifiedItemClick = HandleModifiedItemClick
+local MerchantItemButton_OnClick = MerchantItemButton_OnClick
+local BuyMerchantItem = BuyMerchantItem
+local MerchantFrame_ConfirmExtendedItemCost = MerchantFrame_ConfirmExtendedItemCost
+local FauxScrollFrame_OnVerticalScroll = FauxScrollFrame_OnVerticalScroll
+local GetMerchantItemInfo, GetMerchantItemLink = GetMerchantItemInfo, GetMerchantItemLink
+local GetMoney, GetCoinTextureString = GetMoney, GetCoinTextureString
+local GetMerchantItemCostInfo, GetMerchantItemCostItem = GetMerchantItemCostInfo, GetMerchantItemCostItem
+local FauxScrollFrame_GetOffset, FauxScrollFrame_Update = FauxScrollFrame_GetOffset, FauxScrollFrame_Update
+local GetMerchantNumItems = GetMerchantNumItems
+local IsModifiedClick = IsModifiedClick
+local MerchantItemButton_OnModifiedClick = MerchantItemButton_OnModifiedClick
+local MerchantItemButton_OnEnter = MerchantItemButton_OnEnter
+local ResetCursor, ShowInspectCursor = ResetCursor, ShowInspectCursor
+local GetCurrencyListInfo = GetCurrencyListInfo
+
+local HIGHLIGHT_FONT_COLOR = HIGHLIGHT_FONT_COLOR
+local SEARCH = SEARCH
+local MAX_ITEM_COST = MAX_ITEM_COST
+local RETRIEVING_ITEM_INFO = RETRIEVING_ITEM_INFO
+local ITEM_SPELL_KNOWN = ITEM_SPELL_KNOWN
+local NUM_BAG_SLOTS = NUM_BAG_SLOTS
+
+local RECIPE = GetItemClassInfo(LE_ITEM_CLASS_RECIPE)
+
+local currencies = {}
+local buttons = {}
+local searching = "";
+local errors = {};
+local knowns = {};
+
+local locale = {
+	deDE = {
+		REQUIRES_LEVEL = "Benötigt Stufe (%d+)",
+		LEVEL = "Stufe %d",
+		REQUIRES_REPUTATION = "Benötigt .+ %- (.+)",
+		REQUIRES_REPUTATION_NAME = "Benötigt (.+) %- .+",
+		REQUIRES_SKILL = "Benötigt (.+) %((%d+)%)",
+		REQUIRES = "Benötigt (.+)",
+	},
+	frFR = {
+		REQUIRES_LEVEL = "Niveau (%d+) requis",
+		LEVEL = "Niveau %d",
+		REQUIRES_REPUTATION = "Requiert .+ %- (.+)",
+		REQUIRES_REPUTATION_NAME = "Requiert (.+) %- .+",
+		REQUIRES_SKILL = "(.+) %((%d+)%) requis",
+		REQUIRES = "Requiert (.+)",
+	},
+	esES = {
+		REQUIRES_LEVEL = "Necesitas ser de nivel (%d+)",
+		LEVEL = "Nivel %d",
+		REQUIRES_REPUTATION = "Requiere .+: (.+)",
+		REQUIRES_REPUTATION_NAME = "Requiere (.+): .+",
+		REQUIRES_SKILL = "Requiere (.+) %((%d+)%)",
+		REQUIRES = "Requiere (.+)",
+	},
+	esMX = {
+		REQUIRES_LEVEL = "Necesitas ser de nivel (%d+)",
+		LEVEL = "Nivel %d",
+		REQUIRES_REPUTATION = "Requiere .+: (.+)",
+		REQUIRES_REPUTATION_NAME = "Requiere (.+): .+",
+		REQUIRES_SKILL = "Requiere (.+) %((%d+)%)",
+		REQUIRES = "Requiere (.+)",
+	},
+	ruRU = {
+		REQUIRES_LEVEL = "Требуется уровень: (%d+)",
+		LEVEL = "Уровень %d",
+		REQUIRES_REPUTATION = "Требуется: (.+) со стороны (.+)",
+		REQUIRES_SKILL = "Требуется: (.+) %((%d+)%)",
+		REQUIRES = "Требуется (.+)",
+	},
+	zhCN = {
+		REQUIRES_LEVEL = "需要等级 (%d+)",
+		LEVEL = "等级 %d",	
+		REQUIRES_REPUTATION = "需要 .+ %- (.+)",	
+		REQUIRES_REPUTATION_NAME = "需要 (.+) %- .+",
+		REQUIRES_SKILL = "需要(.+)%((%d+)%)",
+		REQUIRES = "需要(.+)",
+	},
+	zhTW = {
+		REQUIRES_LEVEL = "需要等级 (%d+)",
+		LEVEL = "等级 %d",
+		REQUIRES_REPUTATION = "需要 .+ %- (.+)",	
+		REQUIRES_REPUTATION_NAME = "需要 (.+) %- .+",
+		REQUIRES_SKILL = "需要(.+)%((%d+)%)",
+		REQUIRES = "需要(.+)",
+	},
+};
+local REQUIRES_LEVEL = locale[GetLocale()].REQUIRES_LEVEL
+local LEVEL = locale[GetLocale()].LEVEL
+local REQUIRES_REPUTATION = locale[GetLocale()].REQUIRES_REPUTATION
+local REQUIRES_REPUTATION_NAME = locale[GetLocale()].REQUIRES_REPUTATION_NAME
+local REQUIRES_SKILL = locale[GetLocale()].REQUIRES_SKILL
+local SKILL = "%1$s (%2$d)"
+local REQUIRES = locale[GetLocale()].REQUIRES
+
+local function Item_OnClick(self)
+	HandleModifiedItemClick(self.itemLink);
+end
+
+local function Item_OnEnter(self)
+	local parent = self:GetParent();
+	if ( parent.isShown and not parent.hover ) then
+		parent.oldr, parent.oldg, parent.oldb, parent.olda = parent.highlight:GetVertexColor();
+		parent.highlight:SetVertexColor(parent.r, parent.g, parent.b, parent.olda);
+		parent.hover = 1;
+	else
+		parent.highlight:Show();
+	end
+
+	_G["GameTooltip"]:SetOwner(self, "ANCHOR_RIGHT");
+	if ( self.pointType == "Beta" ) then
+		_G["GameTooltip"]:SetText(self.itemLink, HIGHLIGHT_FONT_COLOR.r, HIGHLIGHT_FONT_COLOR.g, HIGHLIGHT_FONT_COLOR.b);
+		_G["GameTooltip"]:Show();
+	else
+		_G["GameTooltip"]:SetHyperlink(self.itemLink);
+	end
+	if ( IsModifiedClick("DRESSUP") ) then
+		ShowInspectCursor();
+	else
+		ResetCursor();
+	end
+end
+
+local function Item_OnLeave(self)
+	local parent = self:GetParent();
+	if ( parent.isShown ) then
+		parent.highlight:SetVertexColor(parent.oldr, parent.oldg, parent.oldb, parent.olda);
+		parent.hover = nil;
+	else
+		parent.highlight:Hide();
+	end
+	_G["GameTooltip"]:Hide();
+	ResetCursor();
+end
+
+local function ListItem_OnClick(self, button)
+	if ( IsModifiedClick() ) then
+		MerchantItemButton_OnModifiedClick(self, button);
+	else
+		MerchantItemButton_OnClick(self, button);
+	end
+end
+
+local function ListItem_OnEnter(self)
+	if ( self.isShown and not self.hover ) then
+		self.oldr, self.oldg, self.oldb, self.olda = self.highlight:GetVertexColor();
+		self.highlight:SetVertexColor(self.r, self.g, self.b, self.olda);
+		self.hover = 1;
+	else
+		self.highlight:Show();
+	end
+	MerchantItemButton_OnEnter(self);
+end
+
+local function ListItem_OnLeave(self)
+	if ( self.isShown ) then
+		self.highlight:SetVertexColor(self.oldr, self.oldg, self.oldb, self.olda);
+		self.hover = nil;
+	else
+		self.highlight:Hide();
+	end
+	_G["GameTooltip"]:Hide();
+	ResetCursor();
+	_G["MerchantFrame"].itemHover = nil;
+end
+
+local function ListItem_OnHide()
+	T.twipe(errors);
+	T.twipe(currencies);
+end
+
+local function List_GetError(link, isRecipe)
+	if ( not link ) then
+		return false;
+	end
+
+	local id = link:match("item:(%d+)");
+
+	if ( errors[id] ) then
+		return errors[id];
+	end
+
+	_G["GameTooltip"]:SetOwner(UIParent, "ANCHOR_NONE");
+	_G["GameTooltip"]:SetHyperlink(link);
+
+	local errormsg = "";
+	for i=2, _G["GameTooltip"]:NumLines() do
+		local text = _G["GameTooltipTextLeft"..i];
+		local r, g, b = text:GetTextColor();
+		local gettext = text:GetText();
+		if ( gettext and r >= 0.9 and g <= 0.2 and b <= 0.2 and gettext ~= RETRIEVING_ITEM_INFO ) then
+			if ( errormsg ~= "" ) then
+				errormsg = errormsg..", ";
+			end
+
+			local level = gettext:match(REQUIRES_LEVEL);
+			if ( level ) then
+				errormsg = errormsg..LEVEL:format(level);
+			end
+
+			local reputation, factionName = T.match(gettext, REQUIRES_REPUTATION);
+			if ( reputation ) then
+				errormsg = errormsg..reputation;
+				if not factionName then factionName = gettext:match(REQUIRES_REPUTATION_NAME); end
+				if ( factionName ) then
+						errormsg = errormsg.." ("..factionName..")";
+				end
+			end
+
+			local skill, slevel = gettext:match(REQUIRES_SKILL);
+			if ( skill and slevel ) then
+				errormsg = errormsg..SKILL:format(skill, slevel);
+			end
+
+			local requires = gettext:match(REQUIRES);
+			if ( not level and not reputation and not skill and requires ) then
+				errormsg = errormsg..requires;
+			end
+
+			if ( not level and not reputation and not skill and not requires ) then
+				if ( errormsg ~= "" ) then
+					errormsg = gettext..", "..errormsg;
+				else
+					errormsg = errormsg..gettext;
+				end
+			end
+		end
+
+		local text = _G["GameTooltipTextRight"..i];
+		local r, g, b = text:GetTextColor();
+		local gettext = text:GetText();
+		if ( gettext and r >= 0.9 and g <= 0.2 and b <= 0.2 ) then
+			if ( errormsg ~= "" ) then
+				errormsg = errormsg..", ";
+			end
+			errormsg = errormsg..gettext;
+		end
+
+		if ( isRecipe and i == 5 ) then
+			break;
+		end
+	end
+
+	if ( errormsg == "" ) then
+		return false;
+	end
+
+	errors[id] = errormsg;
+	return errormsg;
+end
+
+local function List_AltCurrencyFrame_Update(item, texture, cost, itemID, currencyName)
+	if ( itemID ~= 0 or currencyName) then
+		local currency = currencies[itemID] or currencies[currencyName];
+		if ( currency and currency < cost or not currency ) then
+			item.count:SetTextColor(1, 0, 0);
+		else
+			item.count:SetTextColor(1, 1, 1);
+		end
+	end
+
+	item.count:SetText(cost);
+	item.icon:SetTexture(texture);
+	item.count:SetPoint("RIGHT", item.icon, "LEFT", -2, 0);
+	item.icon:SetTexCoord(0, 1, 0, 1);
+
+	local iconWidth = 17;
+	item.icon:SetWidth(iconWidth);
+	item.icon:SetHeight(iconWidth);
+	item:SetWidth(item.count:GetWidth() + iconWidth + 4);
+	item:SetHeight(item.count:GetHeight() + 4);
+end
+
+local function List_CurrencyUpdate()
+	T.twipe(currencies);
+
+	local limit = T.GetCurrencyListSize();
+
+	for i=1, limit do
+		local name, isHeader, _, _, _, count, icon, maximum, hasWeeklyLimit, currentWeeklyAmount, _, itemID = GetCurrencyListInfo(i);
+		if ( not isHeader and itemID ) then
+			currencies[T.tonumber(itemID)] = count;
+			if ( not isHeader and itemID and T.tonumber(itemID) <= 9 ) then
+				currencies[name] = count;
+			end
+		elseif ( not isHeader and not itemID ) then
+			currencies[name] = count;
+		end
+	end
+
+	for i=INVSLOT_FIRST_EQUIPPED, INVSLOT_LAST_EQUIPPED, 1 do
+		local itemID = T.GetInventoryItemID("player", i);
+		if ( itemID ) then
+			currencies[T.tonumber(itemID)] = 1;
+		end
+	end
+
+	for bagID=0, NUM_BAG_SLOTS, 1 do
+		local numSlots = T.GetContainerNumSlots(bagID);
+		for slotID=1, numSlots, 1 do
+			local itemID = T.GetContainerItemID(bagID, slotID);
+			if ( itemID ) then
+				local count = T.select(2, T.GetContainerItemInfo(bagID, slotID));
+				itemID = T.tonumber(itemID);
+				local currency = currencies[itemID];
+				if ( currency ) then
+					currencies[itemID] = currency+count;
+				else
+					currencies[itemID] = count;
+				end
+			end
+		end
+	end
+end
+
+local function List_UpdateAltCurrency(button, index, i)
+	local currency_frames = {};
+	local lastFrame;
+	local itemCount = GetMerchantItemCostInfo(index);
+
+	if ( itemCount > 0 ) then
+		for i=1, MAX_ITEM_COST do
+			local itemTexture, itemValue, itemLink, currencyName = GetMerchantItemCostItem(index, i);
+			local item = button.item[i];
+			item.index = index;
+			item.item = i;
+			if( currencyName ) then
+				item.pointType = "Beta";
+				item.itemLink = currencyName;
+			else
+				item.pointType = nil;
+				item.itemLink = itemLink;
+			end
+			
+			local itemID = T.tonumber((itemLink or "item:0"):match("item:(%d+)"));
+			List_AltCurrencyFrame_Update(item, itemTexture, itemValue, itemID, currencyName);
+
+			if ( not itemTexture ) then
+				item:Hide();
+			else
+				lastFrame = item;
+				lastFrame._dbg_name = "item"..i
+				T.tinsert(currency_frames, item)
+				item:Show();
+			end
+		end
+	else
+		for i=1, MAX_ITEM_COST do
+			button.item[i]:Hide();
+		end
+	end
+
+	button.money._dbg_name = "money"
+	T.tinsert(currency_frames, button.money)
+
+	lastFrame = nil
+	for i,frame in T.ipairs(currency_frames) do
+		if i == 1 then
+			frame:SetPoint("RIGHT", -2, 6);
+		else
+			if lastFrame then
+				frame:SetPoint("RIGHT", lastFrame, "LEFT", -2, 0);
+			else
+				frame:SetPoint("RIGHT", -2, 0);
+			end
+		end
+		lastFrame = frame
+	end
+end
+
+local function List_GetKnown(link)
+	if ( not link ) then
+		return false;
+	end
+	
+	local id = link:match("item:(%d+)");
+	if ( knowns[id] ) then
+		return true;
+	end
+	
+	_G["GameTooltip"]:SetOwner(UIParent, "ANCHOR_NONE");
+	_G["GameTooltip"]:SetHyperlink(link);
+	
+	for i=1, _G["GameTooltip"]:NumLines() do
+		if ( _G["GameTooltipTextLeft"..i]:GetText() == ITEM_SPELL_KNOWN ) then
+			knowns[id] = true;
+			return true;
+		end
+	end
+	
+	return false;
+end
+
+local function List_MerchantUpdate()
+	local self = _G["SLE_ListMerchantFrame"]
+	local numMerchantItems = GetMerchantNumItems();
+	
+	FauxScrollFrame_Update(self.scrollframe, numMerchantItems, 10, 29.4, nil, nil, nil, nil, nil, nil, 1);
+	for i=1, 10 do
+		local offset = i+FauxScrollFrame_GetOffset(self.scrollframe);
+		local button = buttons[i];
+		button.hover = nil;
+		if ( offset <= numMerchantItems ) then
+			--API name, texture, price, quantity, numAvailable, isUsable, extendedCost = GetMerchantItemInfo(index)
+			local name, texture, price, quantity, numAvailable, isUsable, extendedCost = GetMerchantItemInfo(offset);
+			local link = GetMerchantItemLink(offset);
+			local subtext = "";
+			local r, g, b = 0.5, 0.5, 0.5;
+			local _, itemRarity, itemType, itemSubType, equipSlot;
+			local iLevel, iLevelText;
+			if ( link ) then
+				--API name, link, quality, iLevel, reqLevel, class, subclass, maxStack, equipSlot, texture, vendorPrice = GetItemInfo(itemID) or GetItemInfo("itemName") or GetItemInfo("itemLink")
+				_, _, itemRarity, iLevel, _, itemType, itemSubType, _, equipSlot = T.GetItemInfo(link);
+				if itemRarity then
+					r, g, b = T.GetItemQualityColor(itemRarity);
+					button.itemname:SetTextColor(r, g, b);
+				end
+				if itemSubType then
+					subtext = itemSubType:gsub("%(OBSOLETE%)", "");
+					if equipSlot and equipSlot ~= "" and equipSlot ~= "INVTYPE_TABARD" then
+						subtext = _G[equipSlot].." ("..iLevel..")";
+					elseif equipSlot and equipSlot == "INVTYPE_TABARD" then
+						subtext = _G[equipSlot]
+					end
+					button.iteminfo:SetText(subtext);
+				else
+					button.iteminfo:SetText("");
+				end
+				
+				local alpha = 0.3;
+				if ( searching == "" or searching == SEARCH:lower() or name:lower():match(searching) 
+					or ( itemRarity and ( T.tostring(itemRarity):lower():match(searching) or _G["ITEM_QUALITY"..T.tostring(itemRarity).."_DESC"]:lower():match(searching) ) )
+					or ( itemType and itemType:lower():match(searching) ) 
+					or ( itemSubType and itemSubType:lower():match(searching) )
+					) then
+					alpha = 1;
+				end
+				button:SetAlpha(alpha);
+			else
+				button.iteminfo:SetText(subtext);
+			end
+			
+			button.itemname:SetText((numAvailable >= 0 and "|cffffffff["..numAvailable.."]|r " or "")..(quantity > 1 and "|cffffffff"..quantity.."x|r " or "")..(name or "|cffff0000"..RETRIEVING_ITEM_INFO));
+			button.icon:SetTexture(texture);
+			
+			List_UpdateAltCurrency(button, offset, i);
+			if ( extendedCost and price <= 0 ) then
+				button.price = nil;
+				button.extendedCost = true;
+				button.money:SetText("");
+			elseif ( extendedCost and price > 0 ) then
+				button.price = price;
+				button.extendedCost = true;
+				button.money:SetText(GetCoinTextureString(price));
+			else
+				button.price = price;
+				button.extendedCost = nil;
+				button.money:SetText(GetCoinTextureString(price));
+			end
+			
+			if ( GetMoney() < price ) then
+				button.money:SetTextColor(1, 0, 0);
+			else
+				button.money:SetTextColor(1, 1, 1);
+			end
+			
+			if ( numAvailable == 0 ) then
+				button.highlight:SetVertexColor(0.5, 0.5, 0.5, 0.5);
+				button.highlight:Show();
+				button.isShown = 1;
+			elseif ( not isUsable ) then
+				button.highlight:SetVertexColor(1, 0.2, 0.2, 0.5);
+				button.highlight:Show();
+				button.isShown = 1;
+				
+				local errors = List_GetError(link, itemType and itemType == RECIPE);
+				if ( errors ) then
+					button.iteminfo:SetText("|cffd00000"..subtext.." - "..errors.."|r");
+				end
+			elseif ( itemType and itemType == RECIPE and not List_GetKnown(link) ) then
+				button.highlight:SetVertexColor(0.2, 1, 0.2, 0.5);
+				button.highlight:Show();
+				button.isShown = 1;
+			else
+				button.highlight:SetVertexColor(r, g, b, 0.5);
+				button.highlight:Hide();
+				button.isShown = nil;
+				local errors = List_GetError(link, itemType and itemType == RECIPE);
+				if ( errors ) then
+					button.iteminfo:SetText("|cffd00000"..subtext.." - "..errors.."|r");
+				end
+			end
+			
+			button.r = r;
+			button.g = g;
+			button.b = b;
+			button.link = GetMerchantItemLink(offset);
+			button.hasItem = true;
+			button.texture = texture;
+			button:SetID(offset);
+			button:Show();
+		else
+			button.price = nil;
+			button.hasItem = nil;
+			button:Hide();
+		end
+		if ( button.hasStackSplit == 1 ) then
+			_G["StackSplitFrame"]:Hide();
+		end
+	end
+end
+
+local function ListSearch_OnTextChanged(self)
+	searching = self:GetText():trim():lower();
+	List_MerchantUpdate();
+end
+
+local function ListSearch_OnShow(self)
+	self:SetText(SEARCH);
+	searching = "";
+end
+
+local function ListSearch_OnEnterPressed(self)
+	self:ClearFocus();
+end
+
+local function ListSearch_OnEscapePressed(self)
+	self:ClearFocus();
+	self:SetText(SEARCH);
+	searching = "";
+end
+
+local function ListSearch_OnEditFocusLost(self)
+	self:HighlightText(0, 0);
+	if ( strtrim(self:GetText()) == "" ) then
+		self:SetText(SEARCH);
+		searching = "";
+	end
+end
+
+local function ListSearch_OnEditFocusGained(self)
+	self:HighlightText();
+	if ( self:GetText():trim():lower() == SEARCH:lower() ) then
+		self:SetText("");
+	end
+end
+
+local function ListStyle_Update()
+	if ( _G["MerchantFrame"].selectedTab == 1 ) then
+		for i=1, 12 do
+			_G["MerchantItem"..i]:Hide();
+		end
+		_G["SLE_ListMerchantFrame"]:Show();
+		List_CurrencyUpdate();
+		List_MerchantUpdate();
+	else
+		_G["SLE_ListMerchantFrame"]:Hide();
+		for i=1, 12 do
+			_G["MerchantItem"..i]:Show();
+		end
+		if ( _G["StackSplitFrame"]:IsShown() ) then
+			_G["StackSplitFrame"]:Hide();
+		end
+	end
+end
+
+local function OnVerticalScroll(self, offset)
+	FauxScrollFrame_OnVerticalScroll(self, offset, 29.4, List_MerchantUpdate);
+end
+
+local function SplitStack(button, split)
+	if ( button.extendedCost ) then
+		MerchantFrame_ConfirmExtendedItemCost(button, split)
+	elseif ( split > 0 ) then
+		BuyMerchantItem(button:GetID(), split);
+	end
+end
+
+local function Create_ListButton(frame, i)
+	local button = CreateFrame("Button", "SLE_ListMerchantFrame_Button"..i, frame);
+	button:SetWidth(frame:GetWidth());
+	button:SetHeight(29.4);
+	if ( i == 1 ) then
+		button:SetPoint("TOPLEFT", 0, -1);
+	else
+		button:SetPoint("TOP", buttons[i-1], "BOTTOM");
+	end
+	button:RegisterForClicks("LeftButtonUp","RightButtonUp");
+	button:RegisterForDrag("LeftButton");
+	button.UpdateTooltip = ListItem_OnEnter;
+	button.SplitStack = SplitStack;
+	button:SetScript("OnClick", ListItem_OnClick);
+	button:SetScript("OnDragStart", MerchantItemButton_OnClick);
+	button:SetScript("OnEnter", ListItem_OnEnter);
+	button:SetScript("OnLeave", ListItem_OnLeave);
+	button:SetScript("OnHide", ListItem_OnHide);
+
+	local highlight = button:CreateTexture("$parentHighlight", "BACKGROUND"); -- better highlight
+	button.highlight = highlight;
+	highlight:SetAllPoints();
+	highlight:SetBlendMode("ADD");
+	highlight:SetTexture("Interface\\Buttons\\UI-Listbox-Highlight2");
+	highlight:Hide();
+
+	local itemname = button:CreateFontString("ARTWORK", "$parentItemName", "GameFontHighlightSmall");
+	button.itemname = itemname;
+	itemname:SetPoint("TOPLEFT", 30.4, -3);
+	itemname:SetJustifyH("LEFT");
+
+	local iteminfo = button:CreateFontString("ARTWORK", "$parentItemInfo", "GameFontDisableSmall");
+	button.iteminfo = iteminfo;
+	iteminfo:SetPoint("BOTTOMLEFT", 30.4, 3);
+	iteminfo:SetJustifyH("LEFT");
+	iteminfo:SetTextHeight(12);
+
+	local icon = button:CreateTexture("$parentIcon", "BORDER");
+	button.icon = icon;
+	icon:SetWidth(25.4);
+	icon:SetHeight(25.4);
+	icon:SetPoint("LEFT", 2, 0);
+	icon:SetTexture("Interface\\Icons\\temp");
+
+	local money = button:CreateFontString("ARTWORK", "$parentMoney", "GameFontHighlight");
+	button.money = money;
+	money:SetPoint("RIGHT", -2, 0);
+	money:SetJustifyH("RIGHT");
+	itemname:SetPoint("RIGHT", money, "LEFT", -2, 0);
+
+	button.item = {};
+	for j=1, MAX_ITEM_COST do
+		local item = CreateFrame("Button", "$parentItem"..j, button);
+		button.item[j] = item;
+		item:SetWidth(17);
+		item:SetHeight(17);
+		if ( j == 1 ) then
+			item:SetPoint("RIGHT", -2, 0);
+		else
+			item:SetPoint("RIGHT", button.item[j-1], "LEFT", -2, 0);
+		end
+		item:RegisterForClicks("LeftButtonUp","RightButtonUp");
+		item:SetScript("OnClick", Item_OnClick);
+		item:SetScript("OnEnter", Item_OnEnter);
+		item:SetScript("OnLeave", Item_OnLeave);
+		item.hasItem = true;
+		item.UpdateTooltip = Item_OnEnter;
+
+		local icon = item:CreateTexture("$parentIcon", "BORDER");
+		item.icon = icon;
+		icon:SetWidth(17);
+		icon:SetHeight(17);
+		icon:SetPoint("RIGHT");
+
+		local count = item:CreateFontString("ARTWORK", "$parentCount", "GameFontHighlight");
+		item.count = count;
+		count:SetPoint("RIGHT", icon, "LEFT", -2, 0);
+	end
+	
+	buttons[i] = button;
+end
+
+local function MerchantListSkinInit()
+	if E.private.skins.blizzard.enable ~= true or E.private.skins.blizzard.merchant ~= true or E.private.sle.skins.merchant.enable ~= true then return end
+	if E.private.sle.skins.merchant.style ~= "List" then return end
+	local frame = CreateFrame("Frame", "SLE_ListMerchantFrame", _G["MerchantFrame"]);
+	frame:SetWidth(331);
+	frame:SetHeight(294);
+	frame:SetPoint("TOPLEFT", 10, -65);
+
+	frame.scrollframe = CreateFrame("ScrollFrame", "SLE_ListMerchantScrollFrame", frame, "FauxScrollFrameTemplate");
+	frame.scrollframe:SetWidth(320);
+	frame.scrollframe:SetHeight(298);
+	frame.scrollframe:SetPoint("TOPLEFT", _G["MerchantFrame"], 22, -65);
+	frame.scrollframe:SetScript("OnVerticalScroll", OnVerticalScroll);
+	frame.scrollframe:CreateBackdrop("Transparent")
+	S:HandleScrollBar(_G["SLE_ListMerchantScrollFrameScrollBar"])
+
+	frame.search = CreateFrame("EditBox", "$parentSearch", frame, "InputBoxTemplate");
+	frame.search:SetWidth(92);
+	frame.search:SetHeight(24);
+	frame.search:SetPoint("BOTTOMLEFT", frame, "TOPLEFT", 50, 9);
+	frame.search:SetAutoFocus(false);
+	frame.search:SetFontObject(ChatFontSmall);
+	frame.search:SetScript("OnTextChanged", ListSearch_OnTextChanged);
+	frame.search:SetScript("OnShow", ListSearch_OnShow);
+	frame.search:SetScript("OnEnterPressed", ListSearch_OnEnterPressed);
+	frame.search:SetScript("OnEscapePressed", ListSearch_OnEscapePressed);
+	frame.search:SetScript("OnEditFocusLost", ListSearch_OnEditFocusLost);
+	frame.search:SetScript("OnEditFocusGained", ListSearch_OnEditFocusGained);
+	frame.search:SetText(SEARCH);
+	S:HandleEditBox(frame.search)
+
+	for i = 1, 10 do Create_ListButton(frame.scrollframe, i) end
+	_G["MerchantFrame"]:SetWidth(_G["MerchantFrame"]:GetWidth() + 26)
+
+	hooksecurefunc("MerchantFrame_Update", ListStyle_Update);
+	hooksecurefunc("MerchantFrame_OnHide", ListItem_OnHide);
+
+	_G["MerchantBuyBackItem"]:ClearAllPoints();
+	_G["MerchantBuyBackItem"]:SetPoint("TOPRIGHT", frame.scrollframe, "BOTTOMRIGHT", 17, -12);
+	local delete = { _G["MerchantNextPageButton"], _G["MerchantPrevPageButton"], _G["MerchantPageText"] } 
+	for i = 1, #delete do
+		delete[i]:Hide()
+		delete[i].Show = function() end;
+	end
+end
+
+hooksecurefunc(S, "Initialize", MerchantListSkinInit)
\ No newline at end of file
-- 
1.7.9.5