WoWInterface SVN ChatScroll

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /
    from Rev 9 to Rev 10
    ↔ Reverse comparison
  •

Rev 9 → Rev 10

trunk/ChatScroll/ChatScroll.lua
4,11 → 4,13
--[[
ChatScroll
 
author: AnduinLothar <karlkfi@cosmosui.org>
author: AnduinLothar <karlkfi@yahoo.com>
 
-ChatFrame Mouse Wheel Scroll
 
Change List
v3.4
- Updates for WoW 4.0.1
v3.3
- Added a Scroll Speed slider
(If you're not using Portfolio manually set ChatScroll_SavedVars.ScrollSpeed to a number > 0)
59,21 → 61,17
end
else
if ( value > 0 ) then
for i=1, ChatScroll_SavedVars.ScrollSpeed do
-- FloatingChatFrame_OnMouseScroll already called ScrollUp once
for i=2, ChatScroll_SavedVars.ScrollSpeed do
chatframe:ScrollUp();
end
elseif ( value < 0 ) then
for i=1, ChatScroll_SavedVars.ScrollSpeed do
-- FloatingChatFrame_OnMouseScroll already called ScrollDown once
for i=2, ChatScroll_SavedVars.ScrollSpeed do
chatframe:ScrollDown();
end
end
end
else
if ( value > 0 ) then
ActionBar_PageUp();
elseif ( value < 0 ) then
ActionBar_PageDown();
end
end
end
 
89,20 → 87,14
ChatFrameMenuButton:Show()
end
 
local frameName, up, down, bottom
local frameName, button
for i=1, NUM_CHAT_WINDOWS do
frameName = "ChatFrame"..i
up = getglobal(frameName.."UpButton")
down = getglobal(frameName.."DownButton")
bottom = getglobal(frameName.."BottomButton")
button = _G[frameName.."ButtonFrame"]
if hidden then
up:Hide()
down:Hide()
bottom:Hide()
button:Hide()
else
up:Show()
down:Show()
bottom:Show()
button:Show()
end
end
end
118,21 → 110,10
end
 
hooksecurefunc(ChatFrameMenuButton, "Show", ScrollButton_OnShow)
 
for i=1, NUM_CHAT_WINDOWS do
local frameName = "ChatFrame"..i
hooksecurefunc(_G[frameName.."UpButton"], "Show", ScrollButton_OnShow)
hooksecurefunc(_G[frameName.."DownButton"], "Show", ScrollButton_OnShow)
hooksecurefunc(_G[frameName.."BottomButton"], "Show", ScrollButton_OnShow)
 
local frame = _G[frameName];
frame:EnableMouseWheel(1);
if (type(frame:GetScript("OnMouseWheel")) == "function") then
frame:HookScript("OnMouseWheel", ChatScroll.OnMouseWheel);
else
frame:SetScript("OnMouseWheel", ChatScroll.OnMouseWheel);
end
hooksecurefunc(_G["ChatFrame"..i.."ButtonFrame"], "Show", ScrollButton_OnShow)
end
hooksecurefunc("FloatingChatFrame_OnMouseScroll", ChatScroll.OnMouseWheel)
 
-- <= == == == == == == == == == == == == =>
-- => Portfolio GUI Config
trunk/ChatScroll/ChatScroll.toc
1,4 → 1,4
## Interface: 30100
## Interface: 40000
## Title: ChatScroll
## Title-deDE: Chat Scroll
## Notes: Makes chat windows scrollable with the mouse wheel and has scroll button visibility options.
6,8 → 6,8
## Author: AnduinLothar
## OptionalDeps: Portfolio, LibDefaults
## SavedVariables: ChatScroll_SavedVars, meh
## Version: 3.3
## X-Date: Oct 25 2008
## Version: 3.4
## X-Date: Oct 27 2010
## X-Category: Chat
## X-Website: http://www.wowinterface.com/downloads/info5359-ChatScroll.html
## X-Email: karlkfi@yahoo.com