Mercurial Hosting > luan
annotate examples/blog/src/private/tools/backup.luan @ 799:9c13a15a4002
Package.load() now returns false instead of null, and caches the result.  This cleans up the luan.isLocked issues.
| author | Franklin Schmidt <fschmidt@gmail.com> | 
|---|---|
| date | Tue, 06 Sep 2016 18:03:19 -0600 | 
| parents | e2eb55d86bb2 | 
| children | 5dbb552075ff | 
| rev | line source | 
|---|---|
| 693 
ca169567ce07
module URIs must now include ".luan"
 Franklin Schmidt <fschmidt@gmail.com> parents: 
597diff
changeset | 1 local Io = require "luan:Io.luan" | 
| 
ca169567ce07
module URIs must now include ".luan"
 Franklin Schmidt <fschmidt@gmail.com> parents: 
597diff
changeset | 2 local Http = require "luan:http/Http.luan" | 
| 
ca169567ce07
module URIs must now include ".luan"
 Franklin Schmidt <fschmidt@gmail.com> parents: 
597diff
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() | |
| 789 | 9 Db.zip(backup) | 
| 597 | 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 | 
