Mercurial Hosting > luan

view examples/blog/src/private/tools/backup.html.luan @ 1262:81d3a01fbd09

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 24 Sep 2018 14:48:59 -0600
parents 4721c482c86b
children 82415c9c0015
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").db or error()


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