Mercurial > wow > hotcorners

comparison Libs/AceGUI-3.0/widgets/AceGUIContainer-TreeGroup.lua @ 17:3000eccbf1a0 v7.3.0.017

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- ToC Update.
author Tercio
date Sat, 02 Sep 2017 14:10:48 -0300
parents 371e14cd2feb
children
comparison
equal deleted inserted replaced
16:6c64dd7f16a2 17:3000eccbf1a0
3 Container that uses a tree control to switch between groups. 3 Container that uses a tree control to switch between groups.
4 -------------------------------------------------------------------------------]] 4 -------------------------------------------------------------------------------]]
5 local Type, Version = "TreeGroup", 40 5 local Type, Version = "TreeGroup", 40
6 local AceGUI = LibStub and LibStub("AceGUI-3.0", true) 6 local AceGUI = LibStub and LibStub("AceGUI-3.0", true)
7 if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end 7 if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end
8
9 local IsLegion = select(4, GetBuildInfo()) >= 70000
10 8
11 -- Lua APIs 9 -- Lua APIs
12 local next, pairs, ipairs, assert, type = next, pairs, ipairs, assert, type 10 local next, pairs, ipairs, assert, type = next, pairs, ipairs, assert, type
13 local math_min, math_max, floor = math.min, math.max, floor 11 local math_min, math_max, floor = math.min, math.max, floor
14 local select, tremove, unpack, tconcat = select, table.remove, unpack, table.concat 12 local select, tremove, unpack, tconcat = select, table.remove, unpack, table.concat
670 scrollbar:SetWidth(16) 668 scrollbar:SetWidth(16)
671 scrollbar:SetScript("OnValueChanged", OnScrollValueChanged) 669 scrollbar:SetScript("OnValueChanged", OnScrollValueChanged)
672 670
673 local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND") 671 local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND")
674 scrollbg:SetAllPoints(scrollbar) 672 scrollbg:SetAllPoints(scrollbar)
675 673 scrollbg:SetColorTexture(0,0,0,0.4)
676 if IsLegion then
677 scrollbg:SetColorTexture(0,0,0,0.4)
678 else
679 scrollbg:SetTexture(0,0,0,0.4)
680 end
681 674
682 local border = CreateFrame("Frame",nil,frame) 675 local border = CreateFrame("Frame",nil,frame)
683 border:SetPoint("TOPLEFT", treeframe, "TOPRIGHT") 676 border:SetPoint("TOPLEFT", treeframe, "TOPRIGHT")
684 border:SetPoint("BOTTOMRIGHT") 677 border:SetPoint("BOTTOMRIGHT")
685 border:SetBackdrop(PaneBackdrop) 678 border:SetBackdrop(PaneBackdrop)