Mercurial Hosting > luan
annotate blog/src/private/tools/backup.luan @ 734:e44e98fe9de8
add scheme "os:..."
| author | Franklin Schmidt <fschmidt@gmail.com> |
|---|---|
| date | Tue, 14 Jun 2016 17:54:12 -0600 |
| parents | ca169567ce07 |
| children | 558740169005 |
| rev | line source |
|---|---|
|
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
597
diff
changeset
|
1 local Io = require "luan:Io.luan" |
|
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
597
diff
changeset
|
2 local Http = require "luan:http/Http.luan" |
|
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
597
diff
changeset
|
3 local Db = require "site:/lib/Db.luan" |
| 597 | 4 |
| 5 | |
| 6 return function() | |
| 7 local backup = Io.uri "site:/private/local/backup.zip" | |
| 8 backup.delete() | |
| 9 Db.backup(backup.to_string()) | |
| 10 | |
| 11 Io.stdout = Http.response.text_writer() | |
| 12 %> | |
| 13 <html> | |
| 14 <body> | |
| 15 backed up to <a href="/private/local/backup.zip">/private/local/backup.zip</a> | |
| 16 </body> | |
| 17 </html> | |
| 18 <% | |
| 19 end |