scrap widget inheritance

luigi/event.lua

@@ -3,26 +3,22 @@ local ROOT = (...):gsub('[^.]*$', '')
 local Base = require(ROOT .. 'base')
 local Hooker = require(ROOT .. 'hooker')
 
-local Event = Base:extend { name = 'Event' }
+local Event = Base:extend({ name = 'Event' })
 
 function Event:emit (target, data, defaultAction)
-    while target do
+    local callbacks = self.registry[target]
-        local handlers = rawget(target, 'eventHandlers')
+    if not callbacks then
-        local callbacks = handlers and handlers[self.name]
+        if defaultAction then defaultAction() end
-        if callbacks then
+        return
+    end
     local result = callbacks(data or {})
     if result ~= nil then return result end
-        end
-        target = target.widgetClass
-    end
     if defaultAction then defaultAction() end
 end
 
 function Event:bind (target, callback)
-    if not rawget(target, 'eventHandlers') then
+    local registry = self.registry
-        target.eventHandlers = {}
+    return Hooker.hook(registry, target, callback)
-    end
-    return Hooker.hook(target.eventHandlers, self.name, callback)
 end
 
 local eventNames = {
@@ -34,7 +30,10 @@ local eventNames = {
 local weakKeyMeta = { __mode = 'k' }
 
 for i, name in ipairs(eventNames) do
-    Event[name] = Event:extend { name = name }
+    Event[name] = Event:extend({
+        name = name,
+        registry = setmetatable({}, weakKeyMeta),
+    })
 end
 
 function Event.injectBinders (t)

luigi/layout.lua

@@ -13,7 +13,7 @@ local weakValueMeta = { __mode = 'v' }
 
 function Layout:constructor (data)
     self.widgets = setmetatable({}, weakValueMeta)
-    self.root = Widget.create(self, data or {})
+    self.root = Widget(self, data or {})
     self:setStyle()
     self:setTheme()
 

luigi/widget.lua

@@ -7,21 +7,15 @@ local Widget = Base:extend()
 
 Widget.isWidget = true
 
-Widget.registeredTypes = {
+Widget.typeDecorators = {
-    sash = ROOT .. 'widget.sash',
+    sash = require(ROOT .. 'widget.sash'),
-    slider = ROOT .. 'widget.slider',
+    slider = require(ROOT .. 'widget.slider'),
-    stepper = ROOT .. 'widget.stepper',
+    stepper = require(ROOT .. 'widget.stepper'),
-    text = ROOT .. 'widget.text',
+    text = require(ROOT .. 'widget.text'),
 }
 
-function Widget.create (layout, data)
+function Widget.register (name, decorator)
-    local path = data.type and Widget.registeredTypes[data.type]
+    Widget.typeDecorators[name] = decorator
-
-    if path then
-        return require(path)(layout, data)
-    end
-
-    return Widget(layout, data)
 end
 
 function Widget:constructor (layout, data)
@@ -45,6 +39,12 @@ function Widget:constructor (layout, data)
         local theme = widget.layout.theme
         return theme and theme:getProperty(self, property)
     end
+
+    local decorate = self.type and Widget.typeDecorators[self.type]
+
+    if decorate then
+        decorate(widget)
+    end
 end
 
 function Widget:extract (data)
@@ -52,7 +52,7 @@ function Widget:extract (data)
     -- TODO: get rid of pairs somehow
     for k, v in pairs(data) do
         if type(k) == 'number' then
-            children[k] = v.isWidget and v or Widget.create(self.layout, v)
+            children[k] = v.isWidget and v or Widget(self.layout, v)
             children[k].parent = self
         else
             self[k] = v
@@ -76,7 +76,7 @@ end
 
 function Widget:addChild (data)
     local layout = self.layout
-    local child = Widget.create(layout, data)
+    local child = Widget(layout, data)
 
     table.insert(self.children, child)
     child.parent = self

luigi/widget/sash.lua

@@ -1,9 +1,6 @@
-local Widget = require((...):gsub('%.[^.]*$', ''))
+return function (self)
 
-local Sash = Widget:extend()
+    self:onPressDrag(function (event)
-
-Sash:onPressDrag(function (event)
-    local self = event.target
         local axis = self.parent.flow
         if axis == 'x' then
             dimension = 'width'
@@ -30,4 +27,4 @@ Sash:onPressDrag(function (event)
         self:reflow()
     end)
 
-return Sash
+end

luigi/widget/slider.lua

@@ -1,23 +1,15 @@
-local Widget = require((...):gsub('%.[^.]*$', ''))
+return function (self)
-
-local Slider = Widget:extend()
-
-function Slider:constructor (layout, data)
-    Widget.constructor(self, layout, data)
 
     self.value = 0.5
-end
 
-Slider:onPressDrag(function (event)
+    self:onPressDrag(function (event)
-    local self = event.target
         local x1, y1, x2, y2 = self:getRectangle(true, true)
         self.value = (event.x - x1) / (x2 - x1)
         if self.value < 0 then self.value = 0 end
         if self.value > 1 then self.value = 1 end
     end)
 
-Slider:onDisplay(function (event)
+    self:onDisplay(function (event)
-    local self = event.target
         local x1, y1, x2, y2 = self:getRectangle(true, true)
         local padding = self.padding or 0
 
@@ -50,4 +42,4 @@ Slider:onDisplay(function (event)
         return false
     end)
 
-return Slider
+end

luigi/widget/stepper.lua

@@ -1,9 +1,4 @@
-local Widget = require((...):gsub('%.[^.]*$', ''))
+return function (self)
-
-local Stepper = Widget:extend()
-
-function Stepper:constructor (layout, data)
-    Widget.constructor(self, layout, data)
 
     self.flow = 'x'
     self.index = 1
@@ -58,6 +53,5 @@ function Stepper:constructor (layout, data)
     end)
 
     updateValue()
-end
 
-return Stepper
+end

luigi/widget/text.lua

@@ -1,9 +1,3 @@
-local Widget = require((...):gsub('%.[^.]*$', ''))
+return function (self)
 
-local Text = Widget:extend()
-
-function Text:constructor (layout, data)
-    Widget.constructor(self, layout, data)
 end
-
-return Text