{"header":{"message":"Update email invitation workflow.","description":"Users with valid invitation codes don't have to provide\ncaptcha validation.","timestamp":"2021-01-09T06:13:28Z","authors":[{"email":"kris@electriccoin.co","name":"Kris Nuttycombe"}]},"hash":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC","authors":[],"deps":{"hashes":[["UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC","Update email invitation workflow."],["AA",null],["MU6WOCCJQWG4A5NLD3GBFATCE3SRE3QQCYXYH6WIKSGLHQOOBVRAC","Update auctions to permit zcash as a funding currency."],["Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","Very WIP. Wow."],["EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC","Autoformat everything with brittany."],["M3KUPGZK2UTW4FG3Q632K7P7MI4FVWD5TTIP45UTI3E72UKOWJBAC","Add invitation email template."],["QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC","Refactor QDB to use a free monad algebra instead."],["BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","Beginning of modularization of server."],["NLZ3JXLOOIL37O3RRQWXHNPNSNEOOLPD6MCB754BEBECQB3KGR2AC","Fix formatting with stylish-haskell."],["U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC","Add captcha check to register route."],["SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC","Get z-addr checks working."],["F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC","Fix signup database issues."],["O2BZOX7MS4JCDS3C6EJQXAWUEQV6HVDCIF2FIN2BCJNRLIU6ZVKAC","Add signup form, captcha check."],["5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC","Integrate zcashd-based zaddr validation."],["2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC","Add invitation logic and clean up DBProg error handling."],["ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC","Use live signup API for client."],["BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","Added primitive user registration handler."],["MB5SHULBN3WP7TGUWZDP6BRGP423FTYKF67T5IF5YHHLNXKQ5REAC","Add route for accepting an invitation with an existing account"],["NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC","Reformat via stylish-haskell"],["HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC","Implement core of payments/billing infrastructure."],["X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC","Fine. I'll use ormolu. At least it doesn't break the code."],["M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC","Preliminary work to add support for Zcash payments."],["64C6AWH66FDKU6UE6Z6JPX2J2GBM2JOPTH2GL6LHKAIUBGNGDZ5AC","Rename Ananke -> Quixotic, project reboot."],["JUFBTX45TKSZMB2D4CGNB73UYM5FXAV2QMKIHBSMHEQDAECYP7HQC","Add project auction queries."]],"deps":["MU6WOCCJQWG4A5NLD3GBFATCE3SRE3QQCYXYH6WIKSGLHQOOBVRAC"],"known":["BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC","2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC","M3KUPGZK2UTW4FG3Q632K7P7MI4FVWD5TTIP45UTI3E72UKOWJBAC","MB5SHULBN3WP7TGUWZDP6BRGP423FTYKF67T5IF5YHHLNXKQ5REAC","NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC","NLZ3JXLOOIL37O3RRQWXHNPNSNEOOLPD6MCB754BEBECQB3KGR2AC","HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC","EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC","O2BZOX7MS4JCDS3C6EJQXAWUEQV6HVDCIF2FIN2BCJNRLIU6ZVKAC","U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC","5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC","ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC","SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC","F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC","X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC","M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC"]},"hunks":[{"Edit":{"inode":{"change":23,"pos":4936},"path":"lib/Aftok/Database.hs","line":104,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":7075}],"down_context":[{"change":3,"pos":28769}],"flag":"BLOCK","start":3,"end":122,"inode":{"change":23,"pos":4936}}},"contents":[{"Add":{"text":"data InvitationError","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:23"}},{"Add":{"text":" = InvitationExpired","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:45"}},{"Add":{"text":" | InvitationAlreadyAccepted","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:75"}},{"Add":{"text":" | InvitationNotFound","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:98"}},{"Add":{"text":" deriving (Eq, Show)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:120"}},{"Add":{"text":"","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:121"}}]}},{"Replacement":{"inode":{"change":23,"pos":4936},"path":"lib/Aftok/Database.hs","line":114,"ins":{"up_context":[{"change":3,"pos":28877}],"down_context":[{"change":3,"pos":28929}],"flag":"BLOCK","start":123,"end":159,"inode":{"change":23,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":28877},"to":{"change":3,"start":28877,"end":28929},"introduced_by":3}],"inode":{"change":23,"pos":4936}},"ins_contents":[{"Add":{"text":" | InvitationError InvitationError","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:158"}}],"del_contents":[{"Del":{"text":" | InvitationExpired","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28898"}},{"Del":{"text":" | InvitationAlreadyAccepted","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28928"}}]}},{"Replacement":{"inode":{"change":23,"pos":4936},"path":"lib/Aftok/Database.hs","line":222,"ins":{"up_context":[{"change":3,"pos":5801}],"down_context":[{"change":3,"pos":5906}],"flag":"BLOCK","start":160,"end":604,"inode":{"change":23,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":5801},"to":{"change":3,"start":8053,"end":8172},"introduced_by":3}],"inode":{"change":23,"pos":4936}},"ins_contents":[{"Add":{"text":"findCurrentInvitation :: (MonadDB m) => C.UTCTime -> InvitationCode -> m (Either InvitationError Invitation)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:268"}},{"Add":{"text":"findCurrentInvitation t ic =","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:297"}},{"Add":{"text":" maybe (Left InvitationNotFound) checkInvitation <$> liftdb (FindInvitation ic)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:378"}},{"Add":{"text":" where","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:386"}},{"Add":{"text":" checkInvitation i","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:408"}},{"Add":{"text":" | t .-. (i ^. invitationTime) > fromSeconds (60 * 60 * 72 :: Int) = Left InvitationExpired","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:505"}},{"Add":{"text":" | isJust (i ^. acceptanceTime) = Left InvitationAlreadyAccepted","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:575"}},{"Add":{"text":" | otherwise = Right i","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:603"}}],"del_contents":[{"Del":{"text":"findInvitation :: (MonadDB m) => InvitationCode -> m (Maybe Invitation)","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:8124"}},{"Del":{"text":"findInvitation ic = liftdb $ FindInvitation ic","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:8171"}}]}},{"Replacement":{"inode":{"change":23,"pos":4936},"path":"lib/Aftok/Database.hs","line":233,"ins":{"up_context":[{"change":3,"pos":444}],"down_context":[{"change":3,"pos":6036}],"flag":"BLOCK","start":605,"end":641,"inode":{"change":23,"pos":4936}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":3,"pos":444},"to":{"change":3,"start":6009,"end":6036},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6009},"to":{"change":3,"start":6009,"end":6036},"introduced_by":3}],"inode":{"change":23,"pos":4936}},"ins_contents":[{"Add":{"text":" inv <- findCurrentInvitation t ic","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:640"}}],"del_contents":[{"Del":{"text":" inv <- findInvitation ic","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:6035"}}]}},{"Replacement":{"inode":{"change":23,"pos":4936},"path":"lib/Aftok/Database.hs","line":236,"ins":{"up_context":[{"change":3,"pos":6088}],"down_context":[{"change":3,"pos":1389}],"flag":"BLOCK","start":642,"end":972,"inode":{"change":23,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6088},"to":{"change":3,"start":28852,"end":28892},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":28892},"to":{"change":3,"start":29309,"end":29556},"introduced_by":3},{"previous":"","flag":"DELETED","from":{"change":3,"pos":29556},"to":{"change":3,"start":28893,"end":28968},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":8393},"to":{"change":3,"start":28893,"end":28968},"introduced_by":3}],"inode":{"change":23,"pos":4936}},"ins_contents":[{"Add":{"text":" Left InvitationNotFound -> raiseSubjectNotFound act","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:697"}},{"Add":{"text":" Left InvitationExpired -> raiseOpForbidden uid (InvitationError InvitationExpired) act","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:788"}},{"Add":{"text":" Left InvitationAlreadyAccepted -> raiseOpForbidden uid (InvitationError InvitationAlreadyAccepted) act","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:895"}},{"Add":{"text":" Right i -> withProjectAuth (i ^. P.projectId) (i ^. P.invitingUser) act","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:971"}}],"del_contents":[{"Del":{"text":" Nothing -> raiseSubjectNotFound act","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:28891"}},{"Del":{"text":" Just i","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29319"}},{"Del":{"text":" | t .-. (i ^. invitationTime) > fromSeconds (60 * 60 * 72 :: Int) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29394"}},{"Del":{"text":" raiseOpForbidden uid InvitationExpired act","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29445"}},{"Del":{"text":" Just i","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29456"}},{"Del":{"text":" | isJust (i ^. acceptanceTime) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29496"}},{"Del":{"text":" raiseOpForbidden uid InvitationAlreadyAccepted act","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29555"}},{"Del":{"text":" Just i -> withProjectAuth (i ^. P.projectId) (i ^. P.invitingUser) act","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:28967"}}]}},{"Edit":{"inode":{"change":24,"pos":2418},"path":"migrations/2021-01-03_16-15-52_auction-descriptions.txt","line":8,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":6903}],"down_context":[],"flag":"BLOCK","start":975,"end":1035,"inode":{"change":24,"pos":2418}}},"contents":[{"Add":{"text":" ALTER TABLE bids ADD COLUMN currency currency_t NOT NULL;","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1034"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":18,"ins":{"up_context":[{"change":3,"pos":103472}],"down_context":[{"change":3,"pos":66138}],"flag":"BLOCK","start":1040,"end":1116,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":3,"pos":103472},"to":{"change":3,"start":66085,"end":66138},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":66085},"to":{"change":3,"start":66085,"end":66138},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":"import Aftok.Database (acceptInvitation, createUser, findCurrentInvitation)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1115"}}],"del_contents":[{"Del":{"text":"import Aftok.Database (acceptInvitation, createUser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66137"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":39,"ins":{"up_context":[{"change":3,"pos":66562}],"down_context":[{"change":3,"pos":66615}],"flag":"BLOCK","start":1117,"end":1190,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":66562},"to":{"change":3,"start":66562,"end":66615},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":"import qualified Data.Text as T","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1148"}},{"Add":{"text":"import qualified Data.Text.Encoding as T","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1189"}}],"del_contents":[{"Del":{"text":"import Data.Text as T","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66583"}},{"Del":{"text":"import Data.Text.Encoding as T","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66614"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":76,"ins":{"up_context":[{"change":3,"pos":67423}],"down_context":[{"change":3,"pos":67454}],"flag":"BLOCK","start":1191,"end":1228,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":67423},"to":{"change":3,"start":67423,"end":67454},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":" _captchaToken :: Maybe Text,","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1227"}}],"del_contents":[{"Del":{"text":" _captchaToken :: Text,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:67453"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":94,"ins":{"up_context":[{"change":3,"pos":5708}],"down_context":[{"change":3,"pos":6020}],"flag":"BLOCK","start":1229,"end":1345,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":5708},"to":{"change":3,"start":5708,"end":5740},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":5740},"to":{"change":3,"start":193,"end":269},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":" <*> (v .:? \"captchaToken\")","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1261"}},{"Add":{"text":" <*> (parseInvitationCodes . join . maybeToList =<< v .:? \"invitation_codes\")","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1344"}}],"del_contents":[{"Del":{"text":" <*> (v .: \"captchaToken\")","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:5739"}},{"Del":{"text":" <*> (parseInvitationCodes . maybeToList =<< v .:? \"invitation_codes\")","pos":"F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC:268"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":141,"ins":{"up_context":[{"change":3,"pos":6412}],"down_context":[{"change":3,"pos":6062}],"flag":"BLOCK","start":1346,"end":1630,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":3,"pos":5009},"to":{"change":3,"start":6412,"end":6484},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6412},"to":{"change":3,"start":6412,"end":6484},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6484},"to":{"change":3,"start":6270,"end":6445},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":" now <- liftIO C.getCurrentTime","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1378"}},{"Add":{"text":" (_, invs) <- partitionEithers <$> snapEval (traverse (findCurrentInvitation now) (userData ^. invitationCodes))","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1492"}},{"Add":{"text":" if null invs","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1507"}},{"Add":{"text":" then checkCaptcha' (userData ^. captchaToken)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1557"}},{"Add":{"text":" else pure () -- skip the captcha check with a valid invitation code","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1629"}}],"del_contents":[{"Del":{"text":" captchaResult <- liftIO $ checkCaptcha cfg (userData ^. captchaToken)","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:6483"}},{"Del":{"text":" case captchaResult of","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:6293"}},{"Del":{"text":" Left err ->","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:6309"}},{"Del":{"text":" let cmsg = \"Captcha check failed, please try again.\"","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:6368"}},{"Del":{"text":" in snapErrorJS 400 cmsg (RegCaptchaError err)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:6421"}},{"Del":{"text":" Right _ -> pure ()","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:6444"}}]}},{"Edit":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":158,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6466},"to":{"change":3,"start":6466,"end":6499},"introduced_by":3}],"inode":{"change":3,"pos":3234}}},"contents":[{"Del":{"text":" now <- liftIO C.getCurrentTime","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:6498"}}]}},{"Edit":{"inode":{"change":3,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":166,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":9285}],"down_context":[{"change":3,"pos":6676}],"flag":"BLOCK","start":1631,"end":2061,"inode":{"change":3,"pos":3234}}},"contents":[{"Add":{"text":" where","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1638"}},{"Add":{"text":" checkCaptcha' = \\case","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1664"}},{"Add":{"text":" Just ct -> do","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1684"}},{"Add":{"text":" captchaResult <- liftIO $ checkCaptcha cfg ct","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1738"}},{"Add":{"text":" case captchaResult of","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1768"}},{"Add":{"text":" Left err ->","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1790"}},{"Add":{"text":" let cmsg = \"Captcha check failed, please try again.\"","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1855"}},{"Add":{"text":" in snapErrorJS 400 cmsg (RegCaptchaError err)","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1914"}},{"Add":{"text":" Right _ -> pure ()","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1943"}},{"Add":{"text":" Nothing ->","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:1960"}},{"Add":{"text":" let cmsg = \"Captcha token or invitation code required.\"","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:2024"}},{"Add":{"text":" in snapErrorJS 400 cmsg ()","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:2060"}}]}},{"Replacement":{"inode":{"change":3,"pos":742},"path":"server/templates/invitation_email.st","line":29,"ins":{"up_context":[{"change":3,"pos":1716}],"down_context":[{"change":3,"pos":2445}],"flag":"BLOCK","start":2064,"end":2298,"inode":{"change":3,"pos":742}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1716},"to":{"change":3,"start":1716,"end":1915},"introduced_by":3}],"inode":{"change":3,"pos":742}},"ins_contents":[{"Add":{"text":"curl --header 'Content-Type: application/json' \\\\","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:2113"}},{"Add":{"text":" --data '{\"username\":\"USER\", \"password\":\"PASS\", \"recoveryType\": \"email\", \"recoveryEmail\":\"$to_email$\", \"invitation_codes\":[\"$inv_code$\"]}' \\\\","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:2259"}},{"Add":{"text":" 'https://aftok.com/api/register'","pos":"UD5T5B7ACLIM7CPSRYGXSQ3EFNS6DTPABPXJE4HQCBI7JYLE5K3QC:2297"}}],"del_contents":[{"Del":{"text":"curl -k -v -H 'Content-Type: application/json' -d '{\"username\":\"USER\", \"password\":\"PASS\", \"email\":\"$to_email$\", \"btcAddr\":\"BTC_ADDR\", \"invitation_codes\":[\"$inv_code$\"]}' 'https://aftok.com/register'","pos":"M3KUPGZK2UTW4FG3Q632K7P7MI4FVWD5TTIP45UTI3E72UKOWJBAC:1914"}}]}}],"owner":"nuttycom","repo":"aftok","token":"OMQthyFYpPXrSFh9eKG26QCHH2oJGIxdTLhWpM61N8Q=","login":null}

…

Dependencies

Change contents

Review