/Tukui/modules/skins/mail.lua

http://github.com/Asphyxia/Tukui · Lua · 140 lines · 115 code · 23 blank · 2 comment · 6 complexity · 341726c8a76d0901f864a8cd6b884bc0 MD5 · raw file

  1. local T, C, L = unpack(select(2, ...))
  2. local function LoadSkin()
  3. MailFrame:StripTextures(true)
  4. MailFrame:CreateBackdrop("Transparent")
  5. MailFrame.backdrop:Point("TOPLEFT", 4, 0)
  6. MailFrame.backdrop:Point("BOTTOMRIGHT", 2, 74)
  7. MailFrame.backdrop:CreateShadow("Transparent")
  8. MailFrame:SetWidth(360)
  9. for i = 1, INBOXITEMS_TO_DISPLAY do
  10. local bg = _G["MailItem"..i]
  11. bg:StripTextures()
  12. bg:CreateBackdrop("Transparent")
  13. bg.backdrop:Point("TOPLEFT", 2, 1)
  14. bg.backdrop:Point("BOTTOMRIGHT", -2, 2)
  15. local b = _G["MailItem"..i.."Button"]
  16. b:StripTextures()
  17. b:SetTemplate("Transparent", true)
  18. b:StyleButton()
  19. local t = _G["MailItem"..i.."ButtonIcon"]
  20. t:SetTexCoord(.08, .92, .08, .92)
  21. t:ClearAllPoints()
  22. t:Point("TOPLEFT", 2, -2)
  23. t:Point("BOTTOMRIGHT", -2, 2)
  24. end
  25. T.SkinCloseButton(InboxCloseButton)
  26. T.SkinNextPrevButton(InboxPrevPageButton)
  27. T.SkinNextPrevButton(InboxNextPageButton)
  28. MailFrameTab1:StripTextures()
  29. MailFrameTab2:StripTextures()
  30. T.SkinTab(MailFrameTab1)
  31. T.SkinTab(MailFrameTab2)
  32. -- send mail
  33. SendMailScrollFrame:StripTextures(true)
  34. SendMailScrollFrame:SetTemplate("Transparent")
  35. T.SkinScrollBar(SendMailScrollFrameScrollBar)
  36. T.SkinEditBox(SendMailNameEditBox)
  37. T.SkinEditBox(SendMailSubjectEditBox)
  38. T.SkinEditBox(SendMailMoneyGold)
  39. T.SkinEditBox(SendMailMoneySilver)
  40. T.SkinEditBox(SendMailMoneyCopper)
  41. SendMailNameEditBox.backdrop:Point("BOTTOMRIGHT", 2, 0)
  42. SendMailSubjectEditBox.backdrop:Point("BOTTOMRIGHT", 2, 0)
  43. SendMailFrame:StripTextures()
  44. local function MailFrameSkin()
  45. for i = 1, ATTACHMENTS_MAX_SEND do
  46. local b = _G["SendMailAttachment"..i]
  47. if not b.skinned then
  48. b:StripTextures()
  49. b:SetTemplate("Transparent", true)
  50. b:StyleButton()
  51. b.skinned = true
  52. end
  53. local t = b:GetNormalTexture()
  54. if t then
  55. t:SetTexCoord(.08, .92, .08, .92)
  56. t:ClearAllPoints()
  57. t:Point("TOPLEFT", 2, -2)
  58. t:Point("BOTTOMRIGHT", -2, 2)
  59. end
  60. end
  61. end
  62. hooksecurefunc("SendMailFrame_Update", MailFrameSkin)
  63. T.SkinButton(SendMailMailButton)
  64. T.SkinButton(SendMailCancelButton)
  65. -- open mail (cod)
  66. OpenMailFrame:StripTextures(true)
  67. OpenMailFrame:CreateBackdrop("Transparent")
  68. OpenMailFrame.backdrop:Point("TOPLEFT", 4, 0)
  69. OpenMailFrame.backdrop:Point("BOTTOMRIGHT", 2, 74)
  70. OpenMailFrame.backdrop:CreateShadow("Transparent")
  71. OpenMailFrame:SetWidth(360)
  72. T.SkinCloseButton(OpenMailCloseButton)
  73. T.SkinButton(OpenMailReportSpamButton)
  74. T.SkinButton(OpenMailReplyButton)
  75. T.SkinButton(OpenMailDeleteButton)
  76. T.SkinButton(OpenMailCancelButton)
  77. T.SkinButton(TakeAll_Button)
  78. T.SkinButton(TakeCash_Button)
  79. OpenMailScrollFrame:StripTextures(true)
  80. OpenMailScrollFrame:SetTemplate("Transparent")
  81. T.SkinScrollBar(OpenMailScrollFrameScrollBar)
  82. SendMailBodyEditBox:SetTextColor(1, 1, 1)
  83. OpenMailBodyText:SetTextColor(1, 1, 1)
  84. InvoiceTextFontNormal:SetTextColor(1, 1, 1)
  85. OpenMailArithmeticLine:Kill()
  86. OpenMailLetterButton:StripTextures()
  87. OpenMailLetterButton:SetTemplate("Transparent", true)
  88. OpenMailLetterButton:StyleButton()
  89. OpenMailLetterButtonIconTexture:SetTexCoord(.08, .92, .08, .92)
  90. OpenMailLetterButtonIconTexture:ClearAllPoints()
  91. OpenMailLetterButtonIconTexture:Point("TOPLEFT", 2, -2)
  92. OpenMailLetterButtonIconTexture:Point("BOTTOMRIGHT", -2, 2)
  93. OpenMailMoneyButton:StripTextures()
  94. OpenMailMoneyButton:SetTemplate("Transparent", true)
  95. OpenMailMoneyButton:StyleButton()
  96. OpenMailMoneyButtonIconTexture:SetTexCoord(.08, .92, .08, .92)
  97. OpenMailMoneyButtonIconTexture:ClearAllPoints()
  98. OpenMailMoneyButtonIconTexture:Point("TOPLEFT", 2, -2)
  99. OpenMailMoneyButtonIconTexture:Point("BOTTOMRIGHT", -2, 2)
  100. for i = 1, ATTACHMENTS_MAX_SEND do
  101. local b = _G["OpenMailAttachmentButton"..i]
  102. b:StripTextures()
  103. b:SetTemplate("Transparent", true)
  104. b:StyleButton()
  105. local t = _G["OpenMailAttachmentButton"..i.."IconTexture"]
  106. if t then
  107. t:SetTexCoord(.08, .92, .08, .92)
  108. t:ClearAllPoints()
  109. t:Point("TOPLEFT", 2, -2)
  110. t:Point("BOTTOMRIGHT", -2, 2)
  111. end
  112. end
  113. OpenMailReplyButton:Point("RIGHT", OpenMailDeleteButton, "LEFT", -2, 0)
  114. OpenMailDeleteButton:Point("RIGHT", OpenMailCancelButton, "LEFT", -2, 0)
  115. SendMailMailButton:Point("RIGHT", SendMailCancelButton, "LEFT", -2, 0)
  116. end
  117. tinsert(T.SkinFuncs["Tukui"], LoadSkin)