From eaf19baed8b7ad57bc82134a96480e4807192252 Mon Sep 17 00:00:00 2001
From: BergesJ <jan.berges@uni-bielefeld.de>
Date: Thu, 29 Jun 2017 18:01:54 +0200
Subject: [PATCH] Update Timeline.hs

---
 Timeline.hs | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/Timeline.hs b/Timeline.hs
index 9bc99da..b189990 100644
--- a/Timeline.hs
+++ b/Timeline.hs
@@ -26,10 +26,12 @@ postTimelineR :: Handler Html
 postTimelineR = do
     getTimelineR
 
-
-postForm :: Maybe PostId -> UserId -> Form Post
-postForm p u = renderDivs $ Post
+-- TODO: Eventuell müssen Sie hier oder in config/models die Reihenfolge der Post-Argumente anpassen. 
+postForm :: UserId -> Form Post
+postForm u = renderDivs $ Post
+                              -- UserId
                          <$> pure u
+                              -- Textfeld mit Default-Wert "Post content"
                          <*> areq textField "Post" (Just "Post content")
-                         <*> pure p
+                              -- Systemzeit
                          <*> lift (liftIO getCurrentTime)