1 files changed, 0 insertions, 122 deletions
diff --git a/lib/mmmfs/browser.moon b/lib/mmmfs/browser.moon
deleted file mode 100644
index ce7709f..0000000
--- a/lib/mmmfs/browser.moon
+++ /dev/null
@@ -1,122 +0,0 @@
-require = relative ..., 1
-import Key from require '.fileder'
-import get_conversions from require '.conversion'
-import ReactiveVar, get_or_create, text, elements from require 'lib.component'
-import div, span, a, select, option from elements
-
-class Browser
-  new: (@root, path='/', rehydrate=false) =>
-    -- root fileder
-    assert @root, 'root fileder is nil'
-
-    -- active path
-    @path = ReactiveVar path
-
-    if MODE == 'CLIENT'
-      -- update URL bar
-      @path\subscribe (path) ->
-        path ..= '/' unless path\match '/$'
-        window.history\pushState nil, '', path
-
-    -- active fileder
-    -- (re)set every time @path changes
-    @active = @path\map @root\walk
-
-    -- currently active property
-    -- (re)set to default every time @active changes
-    @prop = @active\map (fileder) ->
-      return unless fileder
-      (fileder\find 'mmm/dom') or next fileder.props
-
-    -- retrieve or create the root
-    @dom = get_or_create 'div', 'browser-root'
-
-    -- prepend the navbar
-    if MODE == 'SERVER'
-      @dom\append div id: 'browser-navbar'
-    else
-      @dom\prepend get_or_create 'div', 'browser-navbar', {
-        span 'path: ', @path\map (path) -> with div style: { display: 'inline-block' }
-          path_segment = (name, href) ->
-            a name, :href, onclick: (_, e) ->
-              e\preventDefault!
-              @navigate href
-
-          href = ''
-          path = path\match '^/(.*)'
-
-          \append path_segment 'root', '/'
-
-          while path
-            name, rest = path\match '^(%w+)/(.*)'
-            if not name
-              name = path
-
-            path = rest
-            href = "#{href}/#{name}"
-
-            \append '/'
-            \append path_segment name, href
-
-        span 'view property: ', @active\map (fileder) ->
-          onchange = (_, e) ->
-            @prop\set Key e.target.value
-
-          current = @prop\get!
-          current = current and current\tostring!
-          with select :onchange, disabled: not fileder
-            if fileder
-              for key, _ in pairs fileder.props
-                value = key\tostring!
-                \append option value, :value, selected: value == current
-      }
-
-    -- append or patch #browser-content
-    @dom\append with get_or_create 'div', 'browser-content'
-      \append @get_content!, (rehydrate and .node.lastChild)
-
-    if rehydrate
-      -- force one rerender to set onclick handlers etc
-      @prop\set @prop\get!
-
-    -- export mmm/component interface
-    @node = @dom.node
-    @render = @dom\render
-
-  -- render #browser-content
-  get_content: () =>
-    disp_error = (msg) -> span msg, style: { color: '#f00' }
-    @prop\map (prop) ->
-      active = @active\get!
-
-      return disp_error "fileder not found!" unless active
-      return disp_error "property not found!" unless prop
-
-      convert = ->
-        conversions = get_conversions 'mmm/dom', prop.type
-        value = assert (active\get prop), "value went missing?"
-
-        return unless conversions
-
-        for i=#conversions,1,-1
-          { :inp, :out, :transform } = conversions[i]
-          value = transform value, active
-
-        value
-
-      ok, res = if MODE == 'CLIENT'
-        pcall convert
-      else
-        true, convert!
-
-      if ok
-        res or disp_error "[no conversion path to mmm/dom]"
-      else
-        warn "error: ", res unless ok
-        disp_error "[unknown error displaying]"
-
-  navigate: (new) => @path\set new
-
-{
-  :Browser
-}