Quellcode durchsuchen

empty the post when adding a new post

that might be handled in multiple places, though?
Lucas Stadler vor 11 Jahren
Ursprung
Commit
adb9c11e0a
1 geänderte Dateien mit 1 neuen und 0 gelöschten Zeilen
  1. 1 0
      elm/Stream.elm

+ 1 - 0
elm/Stream.elm

65
65
66
      AddPost _ -> { model |
66
      AddPost _ -> { model |
67
                      isEditing <- False,
67
                      isEditing <- False,
68
                      newPost <- Post.empty,
68
                      posts <- let p = model.newPost
69
                      posts <- let p = model.newPost
69
                               in { p | created <- model.referenceDate } :: model.posts }
70
                               in { p | created <- model.referenceDate } :: model.posts }
70
71