Mercurial Hosting > luan

comparison blog/src/lib/test.luan @ 598:e930f92d0f61

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add blog test
author Franklin Schmidt <fschmidt@gmail.com>
date Wed, 16 Sep 2015 14:32:52 -0600
parents
children 35dde32c02ab
comparison
equal deleted inserted replaced
597:cb6c628de583 598:e930f92d0f61
1 local Luan = require "luan:Luan"
2 local error = Luan.error
3 local to_string = Luan.to_string or error()
4 local Http = require "luan:http/Http"
5 local Http_test = require "luan:http/Http_test"
6 local init = Http_test.init or error()
7 local get_page = Http_test.get_page or error()
8 local Io = require "luan:Io"
9 local print = Io.print or error()
10 local String = require "luan:String"
11 local match = String.match or error()
12
13 Http.uncache_site()
14
15 local Db_mod = require "site:/lib/Db_mod"
16
17 Db_mod.lucene_dir = "site:/private/local/lucene_test"
18 local Db = require "site:/lib/Db"
19 Db.delete_all()
20
21 local Post = require "site:/lib/Post"
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 match(page,'this is an edit') or error()
61
62 print 'done'