WoWInterface SVN ChatScroll

Compare Revisions

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

Rev 10 → Rev 9

ChatScroll.lua
4,13 → 4,11
--[[
ChatScroll
 
author: AnduinLothar <karlkfi@yahoo.com>
author: AnduinLothar <karlkfi@cosmosui.org>
 
-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)
61,17 → 59,21
end
else
if ( value > 0 ) then
-- FloatingChatFrame_OnMouseScroll already called ScrollUp once
for i=2, ChatScroll_SavedVars.ScrollSpeed do
for i=1, ChatScroll_SavedVars.ScrollSpeed do
chatframe:ScrollUp();
end
elseif ( value < 0 ) then
-- FloatingChatFrame_OnMouseScroll already called ScrollDown once
for i=2, ChatScroll_SavedVars.ScrollSpeed do
for i=1, 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
 
87,14 → 89,20
ChatFrameMenuButton:Show()
end
 
local frameName, button
local frameName, up, down, bottom
for i=1, NUM_CHAT_WINDOWS do
frameName = "ChatFrame"..i
button = _G[frameName.."ButtonFrame"]
up = getglobal(frameName.."UpButton")
down = getglobal(frameName.."DownButton")
bottom = getglobal(frameName.."BottomButton")
if hidden then
button:Hide()
up:Hide()
down:Hide()
bottom:Hide()
else
button:Show()
up:Show()
down:Show()
bottom:Show()
end
end
end
110,10 → 118,21
end
 
hooksecurefunc(ChatFrameMenuButton, "Show", ScrollButton_OnShow)
 
for i=1, NUM_CHAT_WINDOWS do
hooksecurefunc(_G["ChatFrame"..i.."ButtonFrame"], "Show", ScrollButton_OnShow)
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
end
hooksecurefunc("FloatingChatFrame_OnMouseScroll", ChatScroll.OnMouseWheel)
 
-- <= == == == == == == == == == == == == =>
-- => Portfolio GUI Config
ChatScroll.toc
1,4 → 1,4
## Interface: 40000
## Interface: 30100
## 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.4
## X-Date: Oct 27 2010
## Version: 3.3
## X-Date: Oct 25 2008
## X-Category: Chat
## X-Website: http://www.wowinterface.com/downloads/info5359-ChatScroll.html
## X-Email: karlkfi@yahoo.com