Add ActiveCommandChanged callin. (#4101)

luarules/gadgets.lua

@@ -157,6 +157,7 @@ local callInLists = {
 	-- "UnitMoveFailed",
 	"StockpileChanged",
 
+	"ActiveCommandChanged",
 	"CommandNotify",
 
 	-- Feature CallIns
@@ -2149,6 +2150,12 @@ function gadgetHandler:DefaultCommand(type, id, cmd)
 	return
 end
 
+function gadgetHandler:ActiveCommandChanged(id, cmdType)
+	for _, g in ipairs(self.ActiveCommandChangedList) do
+		g:ActiveCommandChanged(id, cmdType)
+	end
+end
+
 function gadgetHandler:CommandNotify(id, params, options)
 	for _, g in ipairs(self.CommandNotifyList) do
 		if g:CommandNotify(id, params, options) then

luaui/barwidgets.lua

@@ -105,6 +105,7 @@ local flexCallIns = {
 	'ShockFront',
 	'WorldTooltip',
 	'MapDrawCmd',
+	'ActiveCommandChanged',
 	'DefaultCommand',
 	'UnitCreated',
 	'UnitFinished',
@@ -1342,6 +1343,14 @@ function widgetHandler:ConfigureLayout(command)
 	return false
 end
 
+function widgetHandler:ActiveCommandChanged(id, cmdType)
+	tracy.ZoneBeginN("W:ActiveCommandChanged")
+	for _, w in ipairs(self.ActiveCommandChangedList) do
+		w:ActiveCommandChanged(id, cmdType)
+	end
+	tracy.ZoneEnd()
+end
+
 function widgetHandler:CommandNotify(id, params, options)
 	tracy.ZoneBeginN("W:CommandNotify")
 	for _, w in ipairs(self.CommandNotifyList) do

luaui/callins.lua

@@ -15,6 +15,7 @@ CallInsList = {
 	"Shutdown",
 	"LayoutButtons",
 	"ConfigureLayout",
+	"ActiveCommandChanged",
 	"CommandNotify",
 
 	"KeyPress",