# HG changeset patch
# User James D. Callahan III <jcallahan@curse.com>
# Date 1363755218 18000
# Node ID 58b090074edaaf41e27b0953c863dfb79f024dab
# Parent  03f1fbe6410490251b8a3dde883a507a78e8a44b
Allow moving the comment frame via the WoWDB logo, and disallow clicking through the frame to the 3D world.

diff -r 03f1fbe64104 -r 58b090074eda Comments.lua
--- a/Comments.lua	Tue Mar 19 14:51:50 2013 -0500
+++ b/Comments.lua	Tue Mar 19 23:53:38 2013 -0500
@@ -77,6 +77,8 @@
     panel.Bg:SetTexture([[Interface\FrameGeneral\UI-Background-Rock]], true, true)
     panel.Bg:SetHorizTile(true)
     panel.Bg:SetVertTile(true)
+    panel:EnableMouse(true)
+    panel:SetMovable(true)
     panel:Hide()
     comment_frame = panel
 
@@ -92,6 +94,16 @@
     header.Bg:SetTexture([[Interface\FrameGeneral\UI-Background-Marble]])
     header.Bg:SetHorizTile(true)
     header.Bg:SetVertTile(true)
+    header:SetMovable(true)
+
+    header:SetScript("OnMouseDown", function()
+        panel:StartMoving()
+    end)
+
+    header:SetScript("OnMouseUp", function()
+        panel:StopMovingOrSizing()
+    end)
+
     panel.header = header
 
     local logo = header:CreateTexture(nil, "ARTWORK")