Mercurial Hosting > luan
annotate examples/blog/test.luan @ 1263:382c444a6c77
add Http.eval_in_root and Http.handle_error
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Mon, 24 Sep 2018 22:06:25 -0600 |
parents | 7d4b5afb636f |
children |
rev | line source |
---|---|
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
1 local Luan = require "luan:Luan.luan" |
598 | 2 local error = Luan.error |
3 local to_string = Luan.to_string or error() | |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
4 local Http = require "luan:http/Http.luan" |
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
5 local Http_test = require "luan:http/Http_test.luan" |
598 | 6 local init = Http_test.init or error() |
7 local get_page = Http_test.get_page or error() | |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
8 local Io = require "luan:Io.luan" |
598 | 9 local print = Io.print or error() |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
10 local String = require "luan:String.luan" |
629
35dde32c02ab
change String.matches()
Franklin Schmidt <fschmidt@gmail.com>
parents:
598
diff
changeset
|
11 local matches = String.matches or error() |
598 | 12 |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
13 local Db = require "site:/lib/Db.luan" |
1224 | 14 Db.db = Db.new("site:/private/local/lucene_test") |
1220 | 15 Db.db.delete_all() |
598 | 16 |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
629
diff
changeset
|
17 local Post = require "site:/lib/Post.luan" |
598 | 18 local page |
19 | |
20 print 'go' | |
21 | |
22 init() | |
23 print '/' | |
24 get_page '/' | |
25 | |
26 init() | |
1218 | 27 print '/new.html' |
28 get_page '/new.html' | |
598 | 29 |
30 init() | |
1152
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
31 Http.request.parameters.subject = 'test' |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
32 Http.request.parameters.content = 'this is a test' |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
33 Http.request.parameters.save = 'whatever' |
1218 | 34 print '/new.html submit' |
35 get_page '/new.html' | |
598 | 36 local posts = Post.get_all() |
37 #posts == 1 or error() | |
38 local post_id = to_string(posts[1].id) | |
39 | |
40 init() | |
1152
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
41 Http.request.parameters.post = post_id |
1218 | 42 print '/edit.html' |
43 get_page '/edit.html' | |
598 | 44 |
45 init() | |
1152
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
46 Http.request.parameters.post = post_id |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
47 Http.request.parameters.subject = 'test' |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
48 Http.request.parameters.content = 'this is an edit' |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
779
diff
changeset
|
49 Http.request.parameters.save = 'whatever' |
1218 | 50 print '/edit.html submit' |
51 get_page '/edit.html' | |
598 | 52 |
53 init() | |
54 print '/ again' | |
55 page = get_page '/' | |
629
35dde32c02ab
change String.matches()
Franklin Schmidt <fschmidt@gmail.com>
parents:
598
diff
changeset
|
56 matches(page,'this is an edit') or error() |
598 | 57 |
58 print 'done' |