{"header":{"message":"Split Login component into its own module.","description":null,"timestamp":"2016-01-22T04:37:41Z","authors":[{"email":"kris.nuttycombe@gmail.com","name":"Kris Nuttycombe"}]},"hash":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC","authors":[],"deps":{"hashes":[["EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC","Split Login component into its own module."],["AA",null],["HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC","Client login now handles response correctly."],["RB2ETNIFLQUA6OA66DAEOXZ25ENMQGNKX5CZRSKEYHTD6BQ6NTFQC","Add skeletal PureScript client project."],["ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC","Begin work on login UI."]],"deps":["HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC"],"known":["RB2ETNIFLQUA6OA66DAEOXZ25ENMQGNKX5CZRSKEYHTD6BQ6NTFQC","ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC"]},"hunks":[{"FileAdd":{"meta":{"basename":"Aftok","metadata":576},"context":[{"change":3,"pos":393}],"contents":[]}},{"FileAdd":{"meta":{"basename":"Login.purs","metadata":0},"context":[{"change":0,"pos":1}],"contents":[{"Add":{"text":"module Aftok.Login where","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:45"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:46"}},{"Add":{"text":"import Prelude","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:61"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:62"}},{"Add":{"text":"import Control.Monad.Aff (Aff())","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:95"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:96"}},{"Add":{"text":"import Data.Maybe (Maybe(..))","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:126"}},{"Add":{"text":"import Data.Functor (($>))","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:153"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:154"}},{"Add":{"text":"import Halogen","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:169"}},{"Add":{"text":"import Halogen.HTML.Core (className)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:206"}},{"Add":{"text":"import qualified Halogen.HTML.Indexed as H","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:249"}},{"Add":{"text":"import qualified Halogen.HTML.Events.Indexed as E","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:299"}},{"Add":{"text":"import qualified Halogen.HTML.Properties.Indexed as P","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:353"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:354"}},{"Add":{"text":"import Network.HTTP.Affjax (AJAX(), affjax)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:398"}},{"Add":{"text":"import Network.HTTP.Method ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:426"}},{"Add":{"text":"import Network.HTTP.StatusCode ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:458"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:459"}},{"Add":{"text":"type LoginState = { username :: String, password :: String }","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:520"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:521"}},{"Add":{"text":"initialState :: LoginState","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:548"}},{"Add":{"text":"initialState = { username: \"\", password: \"\" }","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:594"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:595"}},{"Add":{"text":"-- | The component query algebra.","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:629"}},{"Add":{"text":"data LoginAction a","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:648"}},{"Add":{"text":" = SetUsername String a","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:673"}},{"Add":{"text":" | SetPassword String a","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:698"}},{"Add":{"text":" | Login String String a","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:724"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:725"}},{"Add":{"text":"-- | The effects used in the login component.","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:771"}},{"Add":{"text":"type LoginEffects eff = HalogenEffects (ajax :: AJAX | eff)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:831"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:832"}},{"Add":{"text":"-- | The definition for the app's main UI component.","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:885"}},{"Add":{"text":"ui :: forall eff. Component LoginState LoginAction (Aff (LoginEffects eff))","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:961"}},{"Add":{"text":"ui = component render eval","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:988"}},{"Add":{"text":" where","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:996"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:997"}},{"Add":{"text":" render :: LoginState -> ComponentHTML LoginAction","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1049"}},{"Add":{"text":" render st =","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1063"}},{"Add":{"text":" H.div ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1074"}},{"Add":{"text":" [ P.classes (className <$> [\"panel\", \"panel-primary\"]) ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1137"}},{"Add":{"text":" [ H.div ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1152"}},{"Add":{"text":" [ P.classes [ className \"panel-heading\" ] ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1204"}},{"Add":{"text":" [ H.h3 [ P.classes [ className \"panel-title\" ]] [ H.text \"Aftok Login\" ] ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1287"}},{"Add":{"text":" , H.div ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1302"}},{"Add":{"text":" [ P.classes [ className \"panel-body\" ] ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1351"}},{"Add":{"text":" [","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1361"}},{"Add":{"text":" H.h2_","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1377"}},{"Add":{"text":" [ H.text \"username:\" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1412"}},{"Add":{"text":" , H.p_","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1427"}},{"Add":{"text":" [ H.input","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1449"}},{"Add":{"text":" [ P.value st.username","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1487"}},{"Add":{"text":" , P.inputType P.InputText","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1529"}},{"Add":{"text":" , E.onValueInput (E.input SetUsername)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1584"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1602"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1616"}},{"Add":{"text":" , H.h2_","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1632"}},{"Add":{"text":" [ H.text \"password:\" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1667"}},{"Add":{"text":" , H.p_","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1682"}},{"Add":{"text":" [ H.input","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1704"}},{"Add":{"text":" [ P.value st.password","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1742"}},{"Add":{"text":" , P.inputType P.InputPassword","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1788"}},{"Add":{"text":" , E.onValueInput (E.input SetPassword)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1843"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1861"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1875"}},{"Add":{"text":" , H.p_","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1890"}},{"Add":{"text":" [ H.button","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1913"}},{"Add":{"text":" [ P.classes (className <$> [\"btn\", \"btn-primary\"])","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:1980"}},{"Add":{"text":" , E.onClick (E.input_ (Login st.username st.password)) ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2052"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2070"}},{"Add":{"text":" [ H.text \"Login\" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2105"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2119"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2129"}},{"Add":{"text":" ]","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2137"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2138"}},{"Add":{"text":" eval :: Natural LoginAction (ComponentDSL LoginState LoginAction (Aff (LoginEffects eff)))","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2231"}},{"Add":{"text":" eval (SetUsername user next) = modify (_ { username = user }) $> next","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2303"}},{"Add":{"text":" eval (SetPassword pass next) = modify (_ { password = pass }) $> next","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2375"}},{"Add":{"text":" eval (Login user pass next) = do","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2410"}},{"Add":{"text":" result <- liftAff' (login user pass)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2451"}},{"Add":{"text":" pure next","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2465"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2466"}},{"Add":{"text":"data LoginResponse ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2486"}},{"Add":{"text":" = OK ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2494"}},{"Add":{"text":" | Forbidden ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2509"}},{"Add":{"text":" | Error { status :: StatusCode, message :: String }","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2563"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2564"}},{"Add":{"text":"-- | Post credentials to the login service and interpret the response","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2634"}},{"Add":{"text":"login :: forall eff. String -> String -> Aff (ajax :: AJAX | eff) LoginResponse","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2714"}},{"Add":{"text":"login user pass = do","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2735"}},{"Add":{"text":" result <- affjax $ { method: POST","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2771"}},{"Add":{"text":" , url: \"/login\"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2808"}},{"Add":{"text":" , headers: []","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2843"}},{"Add":{"text":" , content: Nothing :: Maybe String","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2899"}},{"Add":{"text":" , username: Just user","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2942"}},{"Add":{"text":" , password: Just pass","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:2985"}},{"Add":{"text":" }","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3008"}},{"Add":{"text":" pure $ case result.status of ","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3040"}},{"Add":{"text":" StatusCode 403 -> Forbidden","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3072"}},{"Add":{"text":" StatusCode 200 -> OK","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3097"}},{"Add":{"text":" other -> Error { status: other , message: result.response }","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3161"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3162"}},{"Add":{"text":"","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3163"}}]}},{"Edit":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":5,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":493},"to":{"change":2,"start":833,"end":862},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":862},"to":{"change":3,"start":520,"end":561},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":520},"to":{"change":3,"start":520,"end":561},"introduced_by":3}],"inode":{"change":3,"pos":410}}},"contents":[{"Del":{"text":"--import Control.Alt ((<|>))","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:861"}},{"Del":{"text":"import Control.Monad.Aff (Aff(), runAff)","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:560"}}]}},{"Replacement":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":7,"ins":{"up_context":[{"change":3,"pos":646}],"down_context":[{"change":3,"pos":646}],"flag":"BLOCK","start":3203,"end":3282,"inode":{"change":3,"pos":410}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":646},"to":{"change":2,"start":863,"end":913},"introduced_by":2}],"inode":{"change":3,"pos":410}},"ins_contents":[{"Add":{"text":"import Control.Monad.Eff.Console (CONSOLE())","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3247"}},{"Add":{"text":"import Control.Monad.Aff (runAff)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3281"}}],"del_contents":[{"Del":{"text":"import Control.Monad.Eff.Console (CONSOLE(), log)","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:912"}}]}},{"Edit":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":10,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":647},"to":{"change":2,"start":914,"end":978},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":978},"to":{"change":3,"start":679,"end":712},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":679},"to":{"change":3,"start":679,"end":712},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":712},"to":{"change":2,"start":979,"end":1018},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":1018},"to":{"change":3,"start":749,"end":776},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":749},"to":{"change":3,"start":749,"end":776},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":776},"to":{"change":2,"start":1019,"end":1053},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":1053},"to":{"change":3,"start":776,"end":809},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":776},"to":{"change":3,"start":776,"end":809},"introduced_by":3}],"inode":{"change":3,"pos":410}}},"contents":[{"Del":{"text":"import Data.Maybe (Maybe(..))","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:943"}},{"Del":{"text":"--import Data.Either (Either(..))","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:977"}},{"Del":{"text":"--import Data.Foldable (foldMap)","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:711"}},{"Del":{"text":"--import Data.Foreign.Class (readProp)","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1017"}},{"Del":{"text":"import Data.Functor (($>))","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:775"}},{"Del":{"text":"import Data.Functor.Eff (liftEff)","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1052"}},{"Del":{"text":"--import Data.Maybe (Maybe(..))","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:807"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:808"}}]}},{"Replacement":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":12,"ins":{"up_context":[{"change":3,"pos":867}],"down_context":[{"change":3,"pos":1094}],"flag":"BLOCK","start":3283,"end":3360,"inode":{"change":3,"pos":410}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":867},"to":{"change":3,"start":867,"end":1052},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1052},"to":{"change":2,"start":1054,"end":1158},"introduced_by":2}],"inode":{"change":3,"pos":410}},"ins_contents":[{"Add":{"text":"import Halogen.Util (appendToBody, onLoad)","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3325"}},{"Add":{"text":"import qualified Aftok.Login as L","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3359"}}],"del_contents":[{"Del":{"text":"import Halogen.HTML.Core (className)","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:903"}},{"Del":{"text":"import qualified Halogen.HTML.Indexed as H","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:946"}},{"Del":{"text":"import qualified Halogen.HTML.Events.Indexed as E","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:996"}},{"Del":{"text":"import qualified Halogen.HTML.Properties.Indexed as P","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1050"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1051"}},{"Del":{"text":"import Network.HTTP.Affjax (AJAX(), affjax)","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1097"}},{"Del":{"text":"import Network.HTTP.Method ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1125"}},{"Del":{"text":"import Network.HTTP.StatusCode ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1157"}}]}},{"Replacement":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":15,"ins":{"up_context":[{"change":3,"pos":1095}],"down_context":[{"change":3,"pos":1189}],"flag":"BLOCK","start":3361,"end":3397,"inode":{"change":3,"pos":410}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1095},"to":{"change":3,"start":1095,"end":1189},"introduced_by":3}],"inode":{"change":3,"pos":410}},"ins_contents":[{"Add":{"text":"import Network.HTTP.Affjax (AJAX())","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3396"}}],"del_contents":[{"Del":{"text":"-- | The state of the component.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1127"}},{"Del":{"text":"type LoginState = { username :: String, password :: String }","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1188"}}]}},{"Edit":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":17,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1190},"to":{"change":3,"start":1190,"end":1428},"introduced_by":3}],"inode":{"change":3,"pos":410}}},"contents":[{"Del":{"text":"initialState :: LoginState","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1216"}},{"Del":{"text":"initialState = { username: \"\", password: \"\" }","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1262"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1263"}},{"Del":{"text":"-- | The component query algebra.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1297"}},{"Del":{"text":"data LoginAction a","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1316"}},{"Del":{"text":" = SetUsername String a","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1341"}},{"Del":{"text":" | SetPassword String a","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1366"}},{"Del":{"text":" | Login String String a","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1392"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1393"}},{"Del":{"text":"-- | The effects used in the app.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1427"}}]}},{"Edit":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":19,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1487},"to":{"change":3,"start":1487,"end":1649},"introduced_by":3},{"previous":"","flag":"DELETED","from":{"change":3,"pos":1649},"to":{"change":3,"start":429,"end":430},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":429},"to":{"change":3,"start":429,"end":430},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":430},"to":{"change":3,"start":1650,"end":3061},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3061},"to":{"change":2,"start":1238,"end":1423},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":1423},"to":{"change":3,"start":3099,"end":3113},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3099},"to":{"change":3,"start":3099,"end":3113},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3113},"to":{"change":2,"start":1424,"end":1522},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":1522},"to":{"change":3,"start":3113,"end":3195},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3113},"to":{"change":3,"start":3113,"end":3195},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3195},"to":{"change":2,"start":1523,"end":2050},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":2,"pos":2050},"to":{"change":3,"start":463,"end":464},"introduced_by":2},{"previous":"","flag":"DELETED","from":{"change":3,"pos":3496},"to":{"change":3,"start":463,"end":464},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":463},"to":{"change":3,"start":463,"end":464},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":464},"to":{"change":3,"start":3497,"end":3515},"introduced_by":3}],"inode":{"change":3,"pos":410}}},"contents":[{"Del":{"text":"-- | The definition for the app's main UI component.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1539"}},{"Del":{"text":"ui :: forall eff. Component LoginState LoginAction (Aff (AppEffects eff))","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1613"}},{"Del":{"text":"ui = component render eval","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1640"}},{"Del":{"text":" where","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1648"}},{"Del":{"text":"","pos":"RB2ETNIFLQUA6OA66DAEOXZ25ENMQGNKX5CZRSKEYHTD6BQ6NTFQC:429"}},{"Del":{"text":" render :: LoginState -> ComponentHTML LoginAction","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1701"}},{"Del":{"text":" render st =","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1715"}},{"Del":{"text":" H.div ","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1726"}},{"Del":{"text":" [ P.classes (className <$> [\"panel\", \"panel-primary\"]) ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1789"}},{"Del":{"text":" [ H.div ","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1804"}},{"Del":{"text":" [ P.classes [ className \"panel-heading\" ] ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1856"}},{"Del":{"text":" [ H.h3 [ P.classes [ className \"panel-title\" ]] [ H.text \"Aftok Login\" ] ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1939"}},{"Del":{"text":" , H.div ","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:1954"}},{"Del":{"text":" [ P.classes [ className \"panel-body\" ] ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2003"}},{"Del":{"text":" [","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2013"}},{"Del":{"text":" H.h2_","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2029"}},{"Del":{"text":" [ H.text \"username:\" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2064"}},{"Del":{"text":" , H.p_","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2079"}},{"Del":{"text":" [ H.input","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2101"}},{"Del":{"text":" [ P.value st.username","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2139"}},{"Del":{"text":" , P.inputType P.InputText","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2181"}},{"Del":{"text":" , E.onValueInput (E.input SetUsername)","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2236"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2254"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2268"}},{"Del":{"text":" , H.h2_","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2284"}},{"Del":{"text":" [ H.text \"password:\" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2319"}},{"Del":{"text":" , H.p_","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2334"}},{"Del":{"text":" [ H.input","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2356"}},{"Del":{"text":" [ P.value st.password","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2394"}},{"Del":{"text":" , P.inputType P.InputPassword","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2440"}},{"Del":{"text":" , E.onValueInput (E.input SetPassword)","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2495"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2513"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2527"}},{"Del":{"text":" , H.p_","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2542"}},{"Del":{"text":" [ H.button","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2565"}},{"Del":{"text":" [ P.classes (className <$> [\"btn\", \"btn-primary\"])","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2632"}},{"Del":{"text":" , E.onClick (E.input_ (Login st.username st.password)) ","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2704"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2722"}},{"Del":{"text":" [ H.text \"Login\" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2757"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2771"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2781"}},{"Del":{"text":" ]","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2789"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2790"}},{"Del":{"text":" eval :: Natural LoginAction (ComponentDSL LoginState LoginAction (Aff (AppEffects eff)))","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2881"}},{"Del":{"text":" eval (SetUsername user next) = modify (_ { username = user }) $> next","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:2953"}},{"Del":{"text":" eval (SetPassword pass next) = modify (_ { password = pass }) $> next","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3025"}},{"Del":{"text":" eval (Login user pass next) = do","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3060"}},{"Del":{"text":" result <- liftAff' (login user pass)","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1278"}},{"Del":{"text":" _ <- liftEff case result of","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1310"}},{"Del":{"text":" OK -> log \"Login succeeded\"","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1345"}},{"Del":{"text":" Forbidden -> log \"Password incorrect\"","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1390"}},{"Del":{"text":" Error m -> log m.message","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1422"}},{"Del":{"text":" pure next","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3112"}},{"Del":{"text":"","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1424"}},{"Del":{"text":"data LoginResponse ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1444"}},{"Del":{"text":" = OK ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1452"}},{"Del":{"text":" | Forbidden ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1467"}},{"Del":{"text":" | Error { status :: StatusCode, message :: String }","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1521"}},{"Del":{"text":"","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3113"}},{"Del":{"text":"-- | Post some PureScript code to the trypurescript API and fetch the JS result.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3194"}},{"Del":{"text":"login :: forall eff. String -> String -> Aff (ajax :: AJAX | eff) LoginResponse","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1602"}},{"Del":{"text":"login user pass = do","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1623"}},{"Del":{"text":" result <- affjax $ { method: POST","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1659"}},{"Del":{"text":" , url: \"/login\"","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1696"}},{"Del":{"text":" , headers: []","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1731"}},{"Del":{"text":" , content: Nothing :: Maybe String","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1787"}},{"Del":{"text":" , username: Just user","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1830"}},{"Del":{"text":" , password: Just pass","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1873"}},{"Del":{"text":" }","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1896"}},{"Del":{"text":" pure $ case result.status of ","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1928"}},{"Del":{"text":" StatusCode 403 -> Forbidden","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1960"}},{"Del":{"text":" StatusCode 200 -> OK","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:1985"}},{"Del":{"text":" other -> Error { status: other , message: result.response }","pos":"HO2PFRABW6BBTE4MUKUTEGXCMJS46WGVBCNWOHO4OL52DVAB4YDAC:2049"}},{"Del":{"text":"","pos":"RB2ETNIFLQUA6OA66DAEOXZ25ENMQGNKX5CZRSKEYHTD6BQ6NTFQC:463"}},{"Del":{"text":"-- | Run the app.","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3514"}}]}},{"Replacement":{"inode":{"change":3,"pos":410},"path":"client/src/Main.purs","line":21,"ins":{"up_context":[{"change":3,"pos":3602}],"down_context":[{"change":3,"pos":3633}],"flag":"BLOCK","start":3398,"end":3433,"inode":{"change":3,"pos":410}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3602},"to":{"change":3,"start":3602,"end":3633},"introduced_by":3}],"inode":{"change":3,"pos":410}},"ins_contents":[{"Add":{"text":" app <- runUI L.ui L.initialState","pos":"EA5BFM5GMM7KNMDLTVOSUKVKMSIDD72TAFVHDVGEOUY5VELECU3QC:3432"}}],"del_contents":[{"Del":{"text":" app <- runUI ui initialState","pos":"ARX7SHY5UXL5ZZDY4BJ6LVQSC2XCI5M6FFXQ35MBWDRUHNJNICHQC:3632"}}]}}],"owner":"nuttycom","repo":"aftok","token":"oB8jgzvxTXRDtx4hM4QKtWl/SN3TkvISL3jUpdRb8Z0=","login":null}

…

Dependencies

Change contents

Review