mrl-html-view

#!/usr/bin/env luajit

local Mrg    = require('mrg')
local io     = require('io')
local mrg    = Mrg.new(-1, -1);
local path
local document=''

if (#arg >= 1) then
  path = arg[1]
  io.input(path)
  document = io.read("*all")
end

mrg:set_ui(
function (mrg, data)
  mrg:print_xml(document)
  mrg:add_binding("control-q", NULL, NULL, function () mrg:quit() end)
end)

mrg:main()