public
Description: WoW Powerleveling addon
Homepage: http://www.tekkub.net/
Clone URL: git://github.com/tekkub/tourguide.git
Click here to lend your support to: tourguide and make a donation at www.pledgie.com !
tourguide / OHConfig.lua
100644 32 lines (19 sloc) 0.728 kb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
local TourGuide = TourGuide
local L = TourGuide.Locale
local ww = WidgetWarlock
 
 
function TourGuide:CreateConfigPanel()
  local frame = CreateFrame("Frame", nil, UIParent)
  frame:SetFrameStrata("DIALOG")
 
  local qtrack = ww.SummonCheckBox(22, frame, "TOPLEFT", 5, -5)
  ww.SummonFontString(qtrack, "OVERLAY", "GameFontNormalSmall", "Automatically track quests", "LEFT", qtrack, "RIGHT", 5, 0)
  qtrack:SetScript("OnClick", function() self.db.char.trackquests = not self.db.char.trackquests end)
 
 
  local function OnShow(f)
    qtrack:SetChecked(self.db.char.trackquests)
 
    f:SetAlpha(0)
    f:SetScript("OnUpdate", ww.FadeIn)
  end
 
  frame:SetScript("OnShow", OnShow)
  ww.SetFadeTime(frame, 0.5)
  OnShow(frame)
  return frame
end