preventDefault on login form submission.

[?]
Aug 17, 2020, 7:40 PM
3LMXT7Z6SIGLQ2OMH7OKPJPWNPN2CSGD3BKUD2NMJVCX2CSAMFYQC

Dependencies

  • [2] NJNMO72S Add zcash.com submodule and update client to modern halogen.
  • [3] TKGBRIQT Login component now raises LoginComplete message.
  • [4] EA5BFM5G Split Login component into its own module.
  • [5] ARX7SHY5 Begin work on login UI.
  • [6] JXG3FCXY Upgrade ps + halogen versions.
  • [7] QQXR7DTO Rework login component to use more appropriate Bootstrap theme.
  • [*] RB2ETNIF Add skeletal PureScript client project.

Change contents

  • edit in client/src/Aftok/Login.purs at line 13
    [2.295408]
    [2.295408]
    import Effect.Class as EC
  • edit in client/src/Aftok/Login.purs at line 23
    [3.774]
    [3.774]
    import Web.Event.Event as WE
  • replacement in client/src/Aftok/Login.purs at line 48
    [2.295903][2.295903:295913]()
    | Login
    [2.295903]
    [3.595]
    | Login WE.Event
  • replacement in client/src/Aftok/Login.purs at line 60
    [2.296122][2.296122:296136]()
    . Monad m
    [2.296122]
    [2.296136]
    . EC.MonadEffect m
  • replacement in client/src/Aftok/Login.purs at line 97
    [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
    [2.300288][2.300288:300306]()
    Login -> do
    [2.300288]
    [2.300306]
    Login ev -> do
    EC.liftEffect $ WE.preventDefault ev
  • edit in client/src/Main.purs at line 19
    [2.307748][2.307748:307786]()
    import Aftok.Timeline (TimelineState)
  • replacement in client/src/Main.purs at line 36
    [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
  • replacement in client/src/Main.purs at line 59
    [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) ]
  • replacement in client/src/Main.purs at line 61
    [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 ]