view src/lib/Mail.luan @ 60:8b5b1bce7d6b

bcode menus
author Franklin Schmidt <fschmidt@gmail.com>
date Wed, 30 Nov 2022 23:50:52 -0700
parents a17e400ddaa1
children
line wrap: on
line source

local Luan = require "luan:Luan.luan"
local error = Luan.error
local parse = Luan.parse or error()
local Luan_mail = require "luan:mail/Mail.luan"
local Db = require "site:/lib/Db.luan"


local Mail = {}

function Mail.get()
	local doc = Db.get_document("type:mail")
	return doc and doc.config
end

function Mail.sender()
	local text = Mail.get()
	if text == nil then
		return nil
	end
	local info = parse(text)
	return Luan_mail.sender(info)
end

function Mail.set(text)
	if text == nil then
		Db.delete("type:mail")
	else
		do  -- test
			local info = parse(text)
			Luan_mail.sender(info)
		end
		local doc = Db.get_document("type:mail") or {type="mail"}
		doc.config = text
		Db.save(doc)
	end
end

return Mail