nuttycom/aftok - Change 3LMXT7Z6SIGLQ2OMH7OKPJPWNPN2CSGD3BKUD2NMJVCX2CSAMFYQC

Created by Kris Nuttycombe on August 17, 2020

3LMXT7Z6SIGLQ2OMH7OKPJPWNPN2CSGD3BKUD2NMJVCX2CSAMFYQC

main

B:BD[2.297497] → [2.297497:297545]

                , E.onSubmit (\_ -> Just Login)

[2.297497]

[2.297545]

                , E.onSubmit (Just <<< Login)

Replacement in client/src/Aftok/Login.purs at line 163 [3.20]
B:BD[2.300288] → [2.300288:300306]
```
      Login -> do
```
[2.300288]
[2.300306]
```
      Login ev -> do
        EC.liftEffect $ WE.preventDefault ev
```
Deletion in client/src/Main.purs at line 19 [5.410]
B:BD[2.307748] → [2.307748:307786]
```
import Aftok.Timeline (TimelineState)
```

B:BD[2.308133] → [2.308133:308197]

  ( login :: Login.Slot Unit
  , timeline :: Timeline.Slot Unit

[2.308133]

[2.308197]

  ( login :: Login.Slot Int
  , timeline :: Timeline.Slot Int

B:BD[2.308708] → [2.308708:308805]

        HH.div_ [ HH.slot _login unit (Login.component loginCap) unit (Just <<< LoginComplete) ]

[2.308708]

[2.308805]

        HH.div_ [ HH.slot _login 0 (Login.component loginCap) unit (Just <<< LoginComplete) ]

B:BD[2.308824] → [2.308824:308924]

        HH.div_ [ HH.slot _timeline unit (Timeline.component { width: toNumber 600 }) unit absurd ]

[2.308824]

[2.308924]

        HH.div_ [ HH.slot _timeline 1 (Timeline.component { width: toNumber 600 }) unit absurd ]