about summary refs log tree commit diff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorVincent Ambo <v.ambo@me.com>2012-03-19T23·26+0100
committerVincent Ambo <v.ambo@me.com>2012-03-19T23·26+0100
commit877a7f84b04e424ffe04e4d0eee889890454978c (patch)
tree5af2b6ce1983ef74e812dbe8fd7f95bb60775846 /src/Main.hs
parent39a30af9c21e173aadacc1d734747f20e9f07e24 (diff)
version 3.1:
* entirely new design (looks a lot better. Thanks to @not_eden and @agoptron for their advice)
* multi-author support (I won't use it yet)
* blogstyle.css serves as the "source" for blog.css
* displaying article eDate and author on entry page
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index ce423f932d9f..d376f9ef0995 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -146,7 +146,7 @@ postEntry acid = do
     nMtext <- lookText' "mtext"
     nEntry <- Entry <$> pure eId
                     <*> getLang lang
-                    <*> lookText' "author"
+                    <*> readCookieValue "sUser"
                     <*> lookText' "title"
                     <*> pure (entryEscape nBtext)
                     <*> pure (entryEscape nMtext)