From 57d4f913bda561ce94de21e624c76a1ebea3dfca Mon Sep 17 00:00:00 2001
From: worldspawn <worldspawn@riseup.net>
Date: Thu, 20 Aug 2020 20:43:29 -0600
Subject: [PATCH] fix for DProperties

---
 lua/themer/main.lua | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/lua/themer/main.lua b/lua/themer/main.lua
index ff695c1..b73e9c9 100644
--- a/lua/themer/main.lua
+++ b/lua/themer/main.lua
@@ -38,6 +38,28 @@ local function ColorHack()
 		derma.DefineControl( "DMenuOption", "Menu Option Line", DMenuOption, "DButton" )
 		derma.DefineControl( "DMenuOptionCVar", "", vgui.GetControlTable("DMenuOptionCVar"), "DMenuOption" )
 	end
+
+	local DProperties = table.Copy(vgui.GetControlTable("DProperties"))
+	local tblCategory = select(2, debug.getupvalue(DProperties.GetCategory, 1))
+	DProperties.GetCategory = function(self, name, bCreate)
+		local cat = self.Categories[name]
+		if IsValid(cat) then return cat end
+
+		if not bCreate then return end
+
+		cat = self:GetCanvas():Add(tblCategory)
+		cat.Label:SetText(name)
+
+		cat.Container.Paint = function(pnl, w, h)
+			self:GetSkin().tex.TextBox(0, 0, w, h)
+		end
+
+		self.Categories[name] = cat
+
+		return cat
+	end
+
+	derma.DefineControl("DProperties", "", DProperties, "Panel")
 end
 
 hook.Add("ForceDermaSkin","Themer",function()