Mercurial Hosting > luan

comparison examples/blog/src/lib/test.luan @ 779:c38f6619feb9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
move blog into examples
author Franklin Schmidt <fschmidt@gmail.com>
date Sun, 28 Aug 2016 14:50:47 -0600
parents blog/src/lib/test.luan@ca169567ce07
children 21d157b153fe
comparison
equal deleted inserted replaced
778:305ffb00ebc1 779:c38f6619feb9
1 local Luan = require "luan:Luan.luan"
2 local error = Luan.error
3 local to_string = Luan.to_string or error()
4 local Http = require "luan:http/Http.luan"
5 local Http_test = require "luan:http/Http_test.luan"
6 local init = Http_test.init or error()
7 local get_page = Http_test.get_page or error()
8 local Io = require "luan:Io.luan"
9 local print = Io.print or error()
10 local String = require "luan:String.luan"
11 local matches = String.matches or error()
12
13 Http.uncache_site()
14
15 local Db_mod = require "site:/lib/Db_mod.luan"
16
17 Db_mod.lucene_dir = "site:/private/local/lucene_test"
18 local Db = require "site:/lib/Db.luan"
19 Db.delete_all()
20
21 local Post = require "site:/lib/Post.luan"
22 local page
23
24 print 'go'
25
26 init()
27 print '/'
28 get_page '/'
29
30 init()
31 print '/new'
32 get_page '/new'
33
34 init()
35 Http.request.parameter.subject = 'test'
36 Http.request.parameter.content = 'this is a test'
37 Http.request.parameter.save = 'whatever'
38 print '/new submit'
39 get_page '/new'
40 local posts = Post.get_all()
41 #posts == 1 or error()
42 local post_id = to_string(posts[1].id)
43
44 init()
45 Http.request.parameter.post = post_id
46 print '/edit'
47 get_page '/edit'
48
49 init()
50 Http.request.parameter.post = post_id
51 Http.request.parameter.subject = 'test'
52 Http.request.parameter.content = 'this is an edit'
53 Http.request.parameter.save = 'whatever'
54 print '/edit submit'
55 get_page '/edit'
56
57 init()
58 print '/ again'
59 page = get_page '/'
60 matches(page,'this is an edit') or error()
61
62 print 'done'