From 308e859d56a56d2f625f2f2fe5c88331e35a8a25 Mon Sep 17 00:00:00 2001 From: Vincent Ambo Date: Sat, 21 Nov 2015 02:59:34 +0100 Subject: [PATCH] [blog] Split request handling, do HTTP better * request handling split into multiple smaller handlers * use request methods in various places instead of different routes * some minor updates to admin page --- src/Blog.hs | 38 +++++++++++----------- src/Server.hs | 89 +++++++++++++++++++++++++-------------------------- 2 files changed, 62 insertions(+), 65 deletions(-) diff --git a/src/Blog.hs b/src/Blog.hs index 973382bc9..f4bdaa698 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -184,7 +184,7 @@ adminLogin = adminTemplate "Login" $ [shamlet|
TazBlog Admin: Login
-
+

Account ID

Passwort @@ -195,40 +195,39 @@ adminLogin = adminTemplate "Login" $ [shamlet| adminIndex :: Text -> Html adminIndex sUser = adminTemplate "Index" $ [shamlet|

- + - -
Titel: +
Title:
Sprache: +
Language:
Text: