Mercurial Hosting > luan
diff examples/blog/src/edit.luan @ 779:c38f6619feb9
move blog into examples
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Sun, 28 Aug 2016 14:50:47 -0600 |
parents | blog/src/edit.luan@1460d297e960 |
children | 21d157b153fe |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/examples/blog/src/edit.luan Sun Aug 28 14:50:47 2016 -0600 @@ -0,0 +1,43 @@ +local Luan = require "luan:Luan.luan" +local error = Luan.error +local String = require "luan:String.luan" +local to_number = String.to_number or error() +local Io = require "luan:Io.luan" +local Http = require "luan:http/Http.luan" +local Post = require "site:/lib/Post.luan" + + +return function() + local post_id = to_number(Http.request.parameter.post) or error() + local post = Post.get_by_id(post_id) or error() + if Http.request.parameter.save ~= nil then + post.subject = Http.request.parameter.subject + post.content = Http.request.parameter.content + post.save() + Http.response.send_redirect("/#p"..post.id) + return + end + + Io.stdout = Http.response.text_writer() +%> +<html> + <head> + <style> + @import "/site.css"; + </style> + </head> + <body> + <h1>Make New Post</h1> + + <form method=post> + <p>Subject: <input name=subject size=50 type=text value="<%= post.subject %>"></p> + <p><textarea name=content rows=20 cols=90><%= post.content %></textarea><br>bbcode works</p> + <p> + <input type=submit name=save value=Submit> + </p> + </form> + + </body> +</html> +<% +end