Mercurial Hosting > luan

view examples/blog/src/private/tools/backup.html.luan @ 1631:35c626c06dd5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add startup scripts for mac os
author fffilimonov
date Mon, 13 Dec 2021 09:14:52 +0000
parents 82415c9c0015
children
line wrap: on
line source

local Luan = require "luan:Luan.luan"
local error = Luan.error
local Io = require "luan:Io.luan"
local Http = require "luan:http/Http.luan"
local Db = require "site:/lib/Db.luan"


return function()
	local backup = Io.uri "site:/private/local/backup.zip"
	backup.delete()
	Db.zip(backup)

	Io.stdout = Http.response.text_writer()
%>
<!doctype html>
<html>
	<body>
		backed up to <a href="/private/local/backup.zip">/private/local/backup.zip</a>
	</body>
</html>
<%
end