{"header":{"message":"Preliminary work to add support for Zcash payments.","description":"This removes a pile of direct dependencies on bitcoin and BIP-70\noriented types in favor of a more modular approach to currency handling.\nSome pieces (auctions in particular) still need to be updated to\nuse the new approach.","timestamp":"2020-12-30T20:53:43Z","authors":[{"email":"kris@electriccoin.co","name":"Kris Nuttycombe"}]},"hash":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC","authors":[],"deps":{"hashes":[["M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC","Preliminary work to add support for Zcash payments."],["AA",null],["Z7CQXTU7NE5TPNLSYN3IQQBSY7IFPCXT3IHVUUSSQCBT24PIXWSAC","Update login scripts, add script for XHR login interface."],["ONSJNBNFE5RI2DMUBM3LQXUUIMCEPLZXZIZOVBHSE7DECPNXE3CQC","Use the more useful `workIndex` endpoint for list_intervals script."],["X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC","Fine. I'll use ormolu. At least it doesn't break the code."],["3QVT6MA6I2CILQH3LUZABS4YQ7MN6CNRYTDRVS376OOHTPLYTFJAC","Add database support for event amend operations."],["NLZ3JXLOOIL37O3RRQWXHNPNSNEOOLPD6MCB754BEBECQB3KGR2AC","Fix formatting with stylish-haskell."],["GKLIPHR5YOBKEMC4744J3WYYFLPFXMZEOLC6Z26QXAG4IM2HQVEQC","Fix error in parsing of event metadata"],["HALRDT2F22DAQ54M334YSKD2XJCAXDXEZPDKGMOWKH7XELBAS6MAC","Added initial auction create route."],["AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC","Implement payments service endpoints."],["AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC","Add migration to include payment network with addresses."],["5XFJNUAZUCQ3WCGW4QRIAWR764QYDOPHOIVO2TRMGSSG7UDX2M2AC","Start of addition of project infrastructure."],["OV5AKJHA773ETIJPTMQ7K64U7BRQE34OXJ6FJNH6TZG22WS5QTIAC","Remove unused LogInterval type."],["TLQ72DSJD7GGPWN6HGBHAVPBRQFKEQ6KSK43U7JWWID4ZWAF47JAC","Lenses, sqlite-simple"],["NJNMO72S7VIUV22JXB4IFPZMHWTJAOTP6EC6Z4QSKYIROSXT52MQC","Add zcash.com submodule and update client to modern halogen."],["Y35QCWYW2OTZ27ZVTH2BA3XJTUCJ2WMLKU32ZCOCDY3AW7TIZXRAC","Minor improvement in WorkIndex type to eliminate duplicated information."],["7VGYLTMURLVSVUYFW7TCRZTDQ6RE2EPSPPA43XKHDOBFWYVVSJHQC","Clean up schema version handling."],["XZLSHL4DE6B5OEJVXALEYXY5JY2EJYUL2SSUJEGMNX65Y6JRJJUAC","The server is now (tenuously) running, and serving pages via SSL!"],["I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC","Require project permissions for access to most data."],["XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC","Adding serveJSON combinator to eliminate some boilerplate from handlers."],["GCVQD44VRPQVKPZEPIC4AOIXLJIG2ZMV3QI2Y7KALUT6NVUBSGSAC","Create amends endpoint, switch to UUID primary keys"],["4IQVQL4TS35GL2GYZJG254TKJLL5EHMRSFT77Z4VTRZIG2TMBM3QC","Added client for payouts endpoint."],["ZP62WC472OTQETO2HTHIQIPO57XZIWVKPA4KL62GYU4OZDMB6NSAC","Begin conversion to build with stack."],["M4KM76DGO77VC4O6N5FFA5MTZH5GI5AJ3OUJU7INLAOY2M3LRLLAC","Merge branch 'stackify'"],["BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC","Add payment response handler."],["RPAJLHMTUJU4AYNBOHVGHGGB4NY2NLY3BVPYN5FMWB3ZIMAUQHCQC","Change to use UUIDs instead of ints for primary keys."],["EKY7U7SKPF45OOUAHJBEQKXSUXWOHFBQFFVJWPBN5ARFJUFM2BPAC","Finish conversion to stack."],["NSRSSSTRMJPPUYQANYDWGI5D3NVM6RQEVZCDUUNQAOL3OWQTD27AC","Update nginx.conf, make aftok host configurable for cli scripts."],["U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC","Add captcha check to register route."],["GKGVYBZGPJXO7N7GLHLRNYQPXFHBQSNQN53OKRFCXLQEYDTC5I4QC","Added JSON serialization to TimeLog"],["A6HKMINBNGQLLX4QJMYWKQ4JAEHVJ4HIRVDKPPDI3FJUO2AAB7OQC","Attempting to improve JSON handling."],["2KZPOGRBY6KBMO76F55ZKIVOLSG3O63VP3RHRZVANXYT3OLZ3OWQC","Once you get Haskell to compile, the tests pass!"],["MB5SHULBN3WP7TGUWZDP6BRGP423FTYKF67T5IF5YHHLNXKQ5REAC","Add route for accepting an invitation with an existing account"],["O5FVTOM6YFBLEPF3S576K6IMT6ZZ5VQCSB3YVXNS4CKBITKCRZ7AC","Undo JSON silliness, enable a couple more routes."],["BWN72T44GRRZ6K2OPN56FTLNEB7J7AGC7T2U5HSMLEKUPGJP2NUAC","Don't accept work timestamp from an external source."],["NMWWP4ZNOKHZKSJ6F5KYEREWXXR5F4UD35WOKI3EH42AZWVCTCJAC","Trying out Hspec"],["SCXG6TJWYIPRUMT27KGKIIF6FYKTUTY74UNZ2FQTT63XZ6HIF3AAC","Make log reduction safer in presence of overlapping events."],["IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","Work in progress replacing sqlite with postgres."],["4QX5E5ACVN57KJLCWOM4JEI6JSV4XZNCWVYPOTKSOMUW3SOMCNJAC","Initial compilation of payouts function succeeds."],["G4BS4NNDS37COYU3K76Q6GXYEK26MWSX5SVPYSQ7VKHZ6YWRITUAC","Add simple shell script demonstrating how to invite a companion."],["NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC","Initial failing tests."],["TNR3TEHKVADAEZSTOD2XLSUTSW5AWST2YUW4CWK5KE7DSC6XHZNAC","Switch to Postgres + snaplet arch compiles."],["TZQJVHBAMDNWDBYCDE3SDVGBG2T5FOE3J5JAD6NENRW36XBHUUFQC","Add auction functions to ADB."],["KEP5WUFJXTMKRRNZLYTGYYWA4VLFCMHTKTJYF5EA5IWBYFMU6WYQC","Convert project to stack-based build."],["NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC","Reformat via stylish-haskell"],["5OI44E4EEVYOMHDWNK2WA7K4L4JWRWCUJUNN2UAUGE5VY4W7GTNAC","Add authentication to auction search."],["73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC","Begin implementation of billing event persistence."],["EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC","Update task list."],["Z24SZOGZJLDTDTGWH7M25RYQ7MYSU52ZLFWJ2PSQFTMK4J35PIWAC","Return richer information from event logging calls."],["W35DDBFYF6Z4ZPCFEO5RPAONZLYCSNTXUSTS6FIUUVZHCI6Q7GHAC","Factor common JSON conversions up into client lib module."],["QADKFHAR3KWQCNYU25Z7PJUGMD5WL26IU3DOAHBTRN2A7NKPUPKAC","Adds CreatePayment handler implementation."],["ZKFETYRKPM2BYO47I4B7ZTZZNIGTUKKYX2KK27KUETVJXUV5O65AC","Print network information in address parse failure message."],["UILI6PILCRDPZ3XYA54LGIGPSU7ERWNHCE7R3CE64ZEC7ONOEMOQC","The route-based logStart/logStop is nicer."],["BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","Added primitive user registration handler."],["SLL7262CJUE7TZDDZZXFROHCVVDA527WA4PHXCKEGZUJF2EN5MQAC","Make depreciation functions more flexible."],["QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC","Refactor QDB to use a free monad algebra instead."],["WAIX6AGNDVJOKTWZ7OP7QOYSJHAJSX5EOWXZHOAO2IG6ALWUCJ6QC","Add event serialization for PaymentRequest & Payment"],["FD7SV5I6VCW27HZ3T3K4MMGB2OYGJTPKFFA263TNTAMRJGQJWVNAC","Fix handling of event_t columns."],["LLKTCDRDAYBESNS3TN75HH6FVS6ICZ7DUUT3SHNRYO5B2WJKBITQC","Minor reorg of aftok.com paths."],["7KZP4RHZ3QSYTPPQ257A65Z5UPX44TF2LAI2U5EMULQCLDCEUK2AC","Switch from Data.Time to Data.Thyme"],["SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC","Get z-addr checks working."],["KNSI575VAW6HRCZYXOEPQ4DTSML4EORML5MV4DJBRKE7TXCPS4EAC","Cleanup of EventLog types."],["EKI57EJR65DA5FPILAHGHHAIU5ITVGHA6V3775OX7GV5XD67OWRQC","Add alternative implementation of auction winner determination."],["ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC","Fix project selection, end log end on project switch."],["4U7F3CPIDTK6JSEDMNMHVKSR7HOQDLZQD2PPVMDLHO5SFSIMUXZAC","THE GREAT RENAMING OF THINGS!"],["Q5X5RYQLP5K7REYD6VLHOKC4W36ZELJYA45V6YFKTD5S6MPN3NDQC","stylish-haskell reformatting"],["O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC","Adds storage of original event JSON for some DBOp constructors."],["POX3UAMTGCNS3SU5I6IKDNCCSHEAUSFBZ3WCMQ3EXKPNXETOI6BAC","Enabling logging of time to contributor/project accounts"],["3MERL4JA5VM7SY5HRIRCZJGVQHWTGVEW3HXFDHTXUEZIDGLMFACQC","Fix incorrect variable in invitation script."],["CDHZL3RP2HGNSSBXD4VDSAW7M3SPBF7LBYB2BL6I3N6EI5URSOJAC","Add a couple of other CLI utilities for interacing with the service."],["DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC","Initial work on payments API"],["2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC","Add invitation logic and clean up DBProg error handling."],["LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC","More database stuff."],["SPJCFHXWUHL5DPU72R6MLMVYCRL4YNOMGTDXRFL6GZPN5KOHAW7AC","Update shell scripts to point to https://aftok.com and prompt for input."],["7DBNV3GV773FH5ZLQWFX4RBOS4Q3CIK2RYZNNABY3ZOETYZCXRNQC","Initial, stack-based impl of time log event reduction."],["WZFQDWW4XK6M4A4PQ7WQJUTZUPRGQR7V7ZVZY5ZTL5AMGIFMHB2QC","Add retrieval/storage of current exchange rate data to payment recording."],["RSEB2NFGUBTFESE5BJKDUVQL5Y5ZVGY5O4CJX2LNP63MS3NRHHZQC","Replacing Snap with Scotty."],["JV3UEPNCNIPNEL3EM4MOJPWTD3ZNL5FUEBEMGNUDKFUXSAWTNKNQC","Fix Aeson constructors."],["F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC","Fix signup database issues."],["ZTPDQKLAB6JJGUFYNBE2OYDW7LV64FNI6BXBO3TBWOM4YF5UWI5QC","Add changes to event_credit_to_amendments"],["RSF6UAJKG7CEKILSVXI6C4YZXY7PIYZM2EMA2IXKQ7SADKNVSH7QC","Break out api module for timeline."],["LHJ2HFXVUQ4VG25I7DADWU73G5K5WNZBDQ3SVNKFYLZ5BEYM4XCQC","Add property test for auction algorithm."],["OBFPJS2GHO2PEHBHGEHKIUOUAFIQHPIZXEVD2YIE3ZIE2PVMH5VAC","Project successfully builds and tests under nix."],["Z3MK2PJ5U222DXRS22WCDHVPZ7HVAR3HOCUNXIGX6VMEPBQDF6PQC","Add GET handler for retrieving auction data."],["ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC","Use live signup API for client."],["PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","Postgres & auth are beginning to function."],["HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC","Implement core of payments/billing infrastructure."],["5DRIWGLUKMQZU2ZPBXSTLAWJKAMOD5YXAHM5LEDQHDFGYYLHWCDQC","Improving TimeLog specs"],["XJ4EYMIHN2JJW6QYQH54VG23O4DURWVYXABUUKQUZV2I6WJS3MFAC","Let curl prompt for http password, rather than bash."],["Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC","Add handler for CreatePaymentRequest"],["IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC","Add billing daemon"],["QMEYU4MWLTSWPWEEOFRLK2IKE64BY3V5X73323WPLCGPP3TPDYGAC","Add display for prior intervals."],["4SCFOJGNDAN4XZEAPWQQCBJ3CGZCJP3HUADRQLYZ2ITAKA7EJJTQC","Specs for recovering intervals from the log now pass."],["LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC","Update to a recent haskoin-core. Fix Stack build."],["EMVTF2IWNQGRL44FC4JNG5FYYQTZSFPNM6SOM7IAEH6T7PPK2NVAC","WIP moving back to snap."],["BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","Beginning of modularization of server."],["JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC","stylish-haskell formatting."],["VRMUVBP66QHIOSLOFYLN7W6EDCZVB42Y6X2MHDMCT3GCJ3KCW7DAC","Make log script work on OSX."],["3GBSDS5PDSTTJTJOLEKZRRTAONS3T3JFZ3FQGFGS3AOXDBZ6SPLAC","Fix out-of-date test code, add skeleton for payments spec."],["EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC","Autoformat everything with brittany."],["5ZSKPQ3KY6T6O5S6T6HW4OHJMQXA72WKJSJJMGKGX2WMFTNZ7EGAC","Add created_at and auction_start timestamps to auction"],["P6NR2CGXCWAW6GXXSIXCGOBIRAS2BM4LEM6D5ADPN4IL7TMW6UVAC","Beginning of implementation of depreciation."],["2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC","Check for an open interval on project switch."],["J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC","Use server timestamps for interval start and end."],["5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC","Integrate zcashd-based zaddr validation."],["4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC","Switch from ClassyPrelude to Relude"],["LAROLAYUGJ4Q5AEFV5EJMIA2ZKBNCBWHHHPCJ3CKCNIUIYUKRFVQC","WIP"],["B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC","Modularize & update to recent haskoin."],["7HPY3QPFPN35PSPUBVNW2GTFB3CBQZBST4J2BAVJ7QMXLIUN52JAC","Fix linting errors. (yay hlint!)"],["ASF3UPJLCX7KIUCNJD5KAXSPDXCUEJHLL4HBRTRUBPCW73IXOCWQC","Add auction creation and bid handlers"],["UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC","Autoformat sources."],["EW2XN7KUMCAQNVFJJ5YTAVDZCPHNWDOEDMRFBUGLY6IE2HKNNX5AC","Update docker build, clean up migration for payments tables."],["HYV3VQADAC3D5G5IQEDZCSVMMNWJPCOUZ5C6CQWE7TGJFEFNWYSAC","Fix a couple of stupid typos."],["UOG5H2TW5R3FSHQPJCEMNFDQZS5APZUP7OM54FIBQG7ZP4HASQ7QC","Default work logging credit to logged-in user."],["2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC","Event logging is now functioning in postgres."],["64C6AWH66FDKU6UE6Z6JPX2J2GBM2JOPTH2GL6LHKAIUBGNGDZ5AC","Rename Ananke -> Quixotic, project reboot."],["FXJQACESPGTLPG5ELXBU3M3OQXUZQQIR7HPIEHQ3FNUTMWVH4WBAC","Ensure that auction is not ended at the time of bid"],["RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC","Update database layer to use CreditTo"],["SOIAMXLWIB5RIEMKXUFMBSE2SKQQTMHYSW3DKUX6GEV4VNOQVHAQC","Build versioned docker images."],["NAS4BFL43SIUAAC663R6VFBHQ2DKI45K6Y6ZKVQI7S5547HBAN7QC","Trivial stylish-haskell reformat."],["E7GQXOIDEENBMGLE3ZMKIVB4RUWL5H7YTR4E4DTX6V7HAVCBBRYAC","Allow the use of a local .env file to store username/project ID for UI scripts."],["2MNO5FUYXF6GHHWTIDLW2JGMFC3UY54BHJKUYVF7SZCUJQWKZ4DQC","Upgrade LTS version"],["QU5FW67RGCWOWT2YFM4NYMJFFHWIRPQANQBBAHBKZUY7UYMCSIMQC","Add project selection to time tracker."],["WO2MINIF4TXOHWSE7JWXRZYN64XRVLYIRFMF4SMPSOXKA2V77KMQC","Auctions now compile!"],["SFWL5626TREXK42DULCXFKKXRCYYGCPAELRZGIRLUMZBNZRAYW7QC","Initial release of UI."],["O722AOKEWXWJPRHGJREU6QPW7HEFPPRETZIAADZ2RMAXHARCNEKAC","Add route to allow crediting of events to users/projects."],["O2BZOX7MS4JCDS3C6EJQXAWUEQV6HVDCIF2FIN2BCJNRLIU6ZVKAC","Add signup form, captcha check."],["SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC","Implement payment request creation functions."],["Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","Very WIP. Wow."],["4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC","Make payment request retrieval key an opaque 32-bit hash."],["LEINLS3X55PB6TSCNC5RVMDMV56XHTV4MNDUC42H7DDFMPDYUNTAC","Update deployment documentation."],["2WOOGXDHVQ6L2MQYUTLJ6H6FVSQNJN6SMJL5DG7HAHFYPJLRT2SAC","Use dbmigrations to manage database state."],["ADMKQQGCGVSHHIMVQ4XFRDCG544SBJCYALSKZV45CQQBZ4ACUH2AC","Initial empty Snap project."]],"deps":["Z7CQXTU7NE5TPNLSYN3IQQBSY7IFPCXT3IHVUUSSQCBT24PIXWSAC","ONSJNBNFE5RI2DMUBM3LQXUUIMCEPLZXZIZOVBHSE7DECPNXE3CQC","X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC"],"known":["NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC","7DBNV3GV773FH5ZLQWFX4RBOS4Q3CIK2RYZNNABY3ZOETYZCXRNQC","2KZPOGRBY6KBMO76F55ZKIVOLSG3O63VP3RHRZVANXYT3OLZ3OWQC","4QX5E5ACVN57KJLCWOM4JEI6JSV4XZNCWVYPOTKSOMUW3SOMCNJAC","Y35QCWYW2OTZ27ZVTH2BA3XJTUCJ2WMLKU32ZCOCDY3AW7TIZXRAC","NMWWP4ZNOKHZKSJ6F5KYEREWXXR5F4UD35WOKI3EH42AZWVCTCJAC","P6NR2CGXCWAW6GXXSIXCGOBIRAS2BM4LEM6D5ADPN4IL7TMW6UVAC","GKGVYBZGPJXO7N7GLHLRNYQPXFHBQSNQN53OKRFCXLQEYDTC5I4QC","RSEB2NFGUBTFESE5BJKDUVQL5Y5ZVGY5O4CJX2LNP63MS3NRHHZQC","64C6AWH66FDKU6UE6Z6JPX2J2GBM2JOPTH2GL6LHKAIUBGNGDZ5AC","EMVTF2IWNQGRL44FC4JNG5FYYQTZSFPNM6SOM7IAEH6T7PPK2NVAC","LAROLAYUGJ4Q5AEFV5EJMIA2ZKBNCBWHHHPCJ3CKCNIUIYUKRFVQC","WO2MINIF4TXOHWSE7JWXRZYN64XRVLYIRFMF4SMPSOXKA2V77KMQC","TZQJVHBAMDNWDBYCDE3SDVGBG2T5FOE3J5JAD6NENRW36XBHUUFQC","TLQ72DSJD7GGPWN6HGBHAVPBRQFKEQ6KSK43U7JWWID4ZWAF47JAC","OBFPJS2GHO2PEHBHGEHKIUOUAFIQHPIZXEVD2YIE3ZIE2PVMH5VAC","W35DDBFYF6Z4ZPCFEO5RPAONZLYCSNTXUSTS6FIUUVZHCI6Q7GHAC","4IQVQL4TS35GL2GYZJG254TKJLL5EHMRSFT77Z4VTRZIG2TMBM3QC","SLL7262CJUE7TZDDZZXFROHCVVDA527WA4PHXCKEGZUJF2EN5MQAC","IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","TNR3TEHKVADAEZSTOD2XLSUTSW5AWST2YUW4CWK5KE7DSC6XHZNAC","BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","5XFJNUAZUCQ3WCGW4QRIAWR764QYDOPHOIVO2TRMGSSG7UDX2M2AC","Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC","I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC","PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC","EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC","JV3UEPNCNIPNEL3EM4MOJPWTD3ZNL5FUEBEMGNUDKFUXSAWTNKNQC","XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC","A6HKMINBNGQLLX4QJMYWKQ4JAEHVJ4HIRVDKPPDI3FJUO2AAB7OQC","FD7SV5I6VCW27HZ3T3K4MMGB2OYGJTPKFFA263TNTAMRJGQJWVNAC","7KZP4RHZ3QSYTPPQ257A65Z5UPX44TF2LAI2U5EMULQCLDCEUK2AC","5DRIWGLUKMQZU2ZPBXSTLAWJKAMOD5YXAHM5LEDQHDFGYYLHWCDQC","SCXG6TJWYIPRUMT27KGKIIF6FYKTUTY74UNZ2FQTT63XZ6HIF3AAC","OV5AKJHA773ETIJPTMQ7K64U7BRQE34OXJ6FJNH6TZG22WS5QTIAC","KNSI575VAW6HRCZYXOEPQ4DTSML4EORML5MV4DJBRKE7TXCPS4EAC","4SCFOJGNDAN4XZEAPWQQCBJ3CGZCJP3HUADRQLYZ2ITAKA7EJJTQC","O5FVTOM6YFBLEPF3S576K6IMT6ZZ5VQCSB3YVXNS4CKBITKCRZ7AC","RPAJLHMTUJU4AYNBOHVGHGGB4NY2NLY3BVPYN5FMWB3ZIMAUQHCQC","GCVQD44VRPQVKPZEPIC4AOIXLJIG2ZMV3QI2Y7KALUT6NVUBSGSAC","4U7F3CPIDTK6JSEDMNMHVKSR7HOQDLZQD2PPVMDLHO5SFSIMUXZAC","XZLSHL4DE6B5OEJVXALEYXY5JY2EJYUL2SSUJEGMNX65Y6JRJJUAC","SPJCFHXWUHL5DPU72R6MLMVYCRL4YNOMGTDXRFL6GZPN5KOHAW7AC","CDHZL3RP2HGNSSBXD4VDSAW7M3SPBF7LBYB2BL6I3N6EI5URSOJAC","HYV3VQADAC3D5G5IQEDZCSVMMNWJPCOUZ5C6CQWE7TGJFEFNWYSAC","QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC","2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC","MB5SHULBN3WP7TGUWZDP6BRGP423FTYKF67T5IF5YHHLNXKQ5REAC","XJ4EYMIHN2JJW6QYQH54VG23O4DURWVYXABUUKQUZV2I6WJS3MFAC","G4BS4NNDS37COYU3K76Q6GXYEK26MWSX5SVPYSQ7VKHZ6YWRITUAC","7HPY3QPFPN35PSPUBVNW2GTFB3CBQZBST4J2BAVJ7QMXLIUN52JAC","KEP5WUFJXTMKRRNZLYTGYYWA4VLFCMHTKTJYF5EA5IWBYFMU6WYQC","ZP62WC472OTQETO2HTHIQIPO57XZIWVKPA4KL62GYU4OZDMB6NSAC","EKY7U7SKPF45OOUAHJBEQKXSUXWOHFBQFFVJWPBN5ARFJUFM2BPAC","M4KM76DGO77VC4O6N5FFA5MTZH5GI5AJ3OUJU7INLAOY2M3LRLLAC","NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC","NLZ3JXLOOIL37O3RRQWXHNPNSNEOOLPD6MCB754BEBECQB3KGR2AC","LHJ2HFXVUQ4VG25I7DADWU73G5K5WNZBDQ3SVNKFYLZ5BEYM4XCQC","EKI57EJR65DA5FPILAHGHHAIU5ITVGHA6V3775OX7GV5XD67OWRQC","HALRDT2F22DAQ54M334YSKD2XJCAXDXEZPDKGMOWKH7XELBAS6MAC","5OI44E4EEVYOMHDWNK2WA7K4L4JWRWCUJUNN2UAUGE5VY4W7GTNAC","Z3MK2PJ5U222DXRS22WCDHVPZ7HVAR3HOCUNXIGX6VMEPBQDF6PQC","ASF3UPJLCX7KIUCNJD5KAXSPDXCUEJHLL4HBRTRUBPCW73IXOCWQC","FXJQACESPGTLPG5ELXBU3M3OQXUZQQIR7HPIEHQ3FNUTMWVH4WBAC","POX3UAMTGCNS3SU5I6IKDNCCSHEAUSFBZ3WCMQ3EXKPNXETOI6BAC","3QVT6MA6I2CILQH3LUZABS4YQ7MN6CNRYTDRVS376OOHTPLYTFJAC","RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC","O722AOKEWXWJPRHGJREU6QPW7HEFPPRETZIAADZ2RMAXHARCNEKAC","BWN72T44GRRZ6K2OPN56FTLNEB7J7AGC7T2U5HSMLEKUPGJP2NUAC","UILI6PILCRDPZ3XYA54LGIGPSU7ERWNHCE7R3CE64ZEC7ONOEMOQC","GKLIPHR5YOBKEMC4744J3WYYFLPFXMZEOLC6Z26QXAG4IM2HQVEQC","7VGYLTMURLVSVUYFW7TCRZTDQ6RE2EPSPPA43XKHDOBFWYVVSJHQC","NAS4BFL43SIUAAC663R6VFBHQ2DKI45K6Y6ZKVQI7S5547HBAN7QC","5ZSKPQ3KY6T6O5S6T6HW4OHJMQXA72WKJSJJMGKGX2WMFTNZ7EGAC","DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC","73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC","Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC","QADKFHAR3KWQCNYU25Z7PJUGMD5WL26IU3DOAHBTRN2A7NKPUPKAC","O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC","WAIX6AGNDVJOKTWZ7OP7QOYSJHAJSX5EOWXZHOAO2IG6ALWUCJ6QC","Q5X5RYQLP5K7REYD6VLHOKC4W36ZELJYA45V6YFKTD5S6MPN3NDQC","HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC","SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC","3GBSDS5PDSTTJTJOLEKZRRTAONS3T3JFZ3FQGFGS3AOXDBZ6SPLAC","JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC","AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC","4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC","BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC","WZFQDWW4XK6M4A4PQ7WQJUTZUPRGQR7V7ZVZY5ZTL5AMGIFMHB2QC","EW2XN7KUMCAQNVFJJ5YTAVDZCPHNWDOEDMRFBUGLY6IE2HKNNX5AC","UOG5H2TW5R3FSHQPJCEMNFDQZS5APZUP7OM54FIBQG7ZP4HASQ7QC","SOIAMXLWIB5RIEMKXUFMBSE2SKQQTMHYSW3DKUX6GEV4VNOQVHAQC","IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC","E7GQXOIDEENBMGLE3ZMKIVB4RUWL5H7YTR4E4DTX6V7HAVCBBRYAC","3MERL4JA5VM7SY5HRIRCZJGVQHWTGVEW3HXFDHTXUEZIDGLMFACQC","VRMUVBP66QHIOSLOFYLN7W6EDCZVB42Y6X2MHDMCT3GCJ3KCW7DAC","2MNO5FUYXF6GHHWTIDLW2JGMFC3UY54BHJKUYVF7SZCUJQWKZ4DQC","LLKTCDRDAYBESNS3TN75HH6FVS6ICZ7DUUT3SHNRYO5B2WJKBITQC","B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC","4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC","EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC","NSRSSSTRMJPPUYQANYDWGI5D3NVM6RQEVZCDUUNQAOL3OWQTD27AC","AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC","ZTPDQKLAB6JJGUFYNBE2OYDW7LV64FNI6BXBO3TBWOM4YF5UWI5QC","NJNMO72S7VIUV22JXB4IFPZMHWTJAOTP6EC6Z4QSKYIROSXT52MQC","QU5FW67RGCWOWT2YFM4NYMJFFHWIRPQANQBBAHBKZUY7UYMCSIMQC","ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC","Z24SZOGZJLDTDTGWH7M25RYQ7MYSU52ZLFWJ2PSQFTMK4J35PIWAC","J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC","QMEYU4MWLTSWPWEEOFRLK2IKE64BY3V5X73323WPLCGPP3TPDYGAC","RSF6UAJKG7CEKILSVXI6C4YZXY7PIYZM2EMA2IXKQ7SADKNVSH7QC","SFWL5626TREXK42DULCXFKKXRCYYGCPAELRZGIRLUMZBNZRAYW7QC","ZKFETYRKPM2BYO47I4B7ZTZZNIGTUKKYX2KK27KUETVJXUV5O65AC","2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC","LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC","UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC","O2BZOX7MS4JCDS3C6EJQXAWUEQV6HVDCIF2FIN2BCJNRLIU6ZVKAC","U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC","5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC","ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC","SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC","F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC"]},"hunks":[{"Replacement":{"inode":{"change":131,"pos":1254},"path":"Makefile","line":4,"ins":{"up_context":[{"change":5,"pos":9}],"down_context":[{"change":5,"pos":92}],"flag":"BLOCK","start":1,"end":68,"inode":{"change":131,"pos":1254}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9},"to":{"change":5,"start":9,"end":92},"introduced_by":5}],"inode":{"change":131,"pos":1254}},"ins_contents":[{"Add":{"text":"\tormolu --mode inplace $(find lib server daemon test -name '*.hs')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67"}}],"del_contents":[{"Del":{"text":"\tfind lib test server daemon -name \\*.hs -exec brittany --write-mode=inplace {} \\;","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:91"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":38,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":237}],"down_context":[{"change":5,"pos":1}],"flag":"BLOCK","start":70,"end":175,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" Aftok.Currency.Bitcoin.Payments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:123"}},{"Add":{"text":" Aftok.Currency.Bitcoin.Bip70","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:174"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":41,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":44}],"down_context":[{"change":5,"pos":238}],"flag":"BLOCK","start":176,"end":327,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" Aftok.Currency.Zcash.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:224"}},{"Add":{"text":" Aftok.Currency.Zcash.Payments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:276"}},{"Add":{"text":" Aftok.Currency.Zcash.Zip321","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:326"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":46,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":323}],"down_context":[{"change":5,"pos":238}],"flag":"BLOCK","start":328,"end":381,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" Aftok.Database.PostgreSQL.Json","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:380"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":48,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":292}],"down_context":[{"change":5,"pos":323}],"flag":"BLOCK","start":382,"end":661,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" Aftok.Database.PostgreSQL.Auctions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:438"}},{"Add":{"text":" Aftok.Database.PostgreSQL.Billing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:494"}},{"Add":{"text":" Aftok.Database.PostgreSQL.Events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:549"}},{"Add":{"text":" Aftok.Database.PostgreSQL.Projects","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:606"}},{"Add":{"text":" Aftok.Database.PostgreSQL.Users","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:660"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":57,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":44}],"down_context":[{"change":5,"pos":1}],"flag":"BLOCK","start":662,"end":792,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" Aftok.Payments.Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:706"}},{"Add":{"text":" Aftok.Payments.Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:749"}},{"Add":{"text":" Aftok.Payments.Util","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:791"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":67,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":1607}],"down_context":[{"change":5,"pos":72}],"flag":"BLOCK","start":793,"end":808,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" , basement","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:807"}}]}},{"Replacement":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":72,"ins":{"up_context":[{"change":5,"pos":178}],"down_context":[{"change":5,"pos":3072}],"flag":"BLOCK","start":809,"end":822,"inode":{"change":5,"pos":1}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":178},"to":{"change":5,"start":178,"end":203},"introduced_by":5}],"inode":{"change":5,"pos":1}},"ins_contents":[{"Add":{"text":" , base64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:821"}}],"del_contents":[{"Del":{"text":" , base64-bytestring ","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:202"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":93,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":179}],"down_context":[{"change":5,"pos":1}],"flag":"BLOCK","start":823,"end":841,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" , MonadRandom","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:840"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":102,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":479}],"down_context":[{"change":5,"pos":1511}],"flag":"BLOCK","start":842,"end":859,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" , scientific","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:858"}}]}},{"Replacement":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":109,"ins":{"up_context":[{"change":5,"pos":502}],"down_context":[{"change":5,"pos":1}],"flag":"BLOCK","start":860,"end":872,"inode":{"change":5,"pos":1}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":502},"to":{"change":5,"start":502,"end":523},"introduced_by":5}],"inode":{"change":5,"pos":1}},"ins_contents":[{"Add":{"text":" , thyme","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:871"}}],"del_contents":[{"Del":{"text":" , thyme ","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:522"}}]}},{"Edit":{"inode":{"change":5,"pos":1},"path":"aftok.cabal","line":113,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":731}],"down_context":[{"change":5,"pos":2887}],"flag":"BLOCK","start":873,"end":890,"inode":{"change":5,"pos":1}}},"contents":[{"Add":{"text":" , uri-encode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:889"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":5,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":468}],"down_context":[{"change":4,"pos":468}],"flag":"BLOCK","start":894,"end":925,"inode":{"change":5,"pos":1458}}},"contents":[{"Add":{"text":"{-# LANGUAGE TupleSections #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:924"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":9,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":1643}],"down_context":[{"change":4,"pos":470}],"flag":"BLOCK","start":926,"end":962,"inode":{"change":5,"pos":1458}}},"contents":[{"Add":{"text":"import qualified Aftok.Billing as B","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:961"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":15,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":564},"to":{"change":4,"start":564,"end":578},"introduced_by":4}],"inode":{"change":5,"pos":1458}}},"contents":[{"Del":{"text":" billable,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:577"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":17,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":612},"to":{"change":4,"start":612,"end":622},"introduced_by":4}],"inode":{"change":5,"pos":1458}}},"contents":[{"Del":{"text":" name,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:621"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":22,"ins":{"up_context":[{"change":4,"pos":740}],"down_context":[{"change":4,"pos":780}],"flag":"BLOCK","start":963,"end":1116,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":740},"to":{"change":4,"start":740,"end":780},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"import Aftok.Currency.Bitcoin (Satoshi, _Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1012"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin.Payments as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1072"}},{"Add":{"text":"import Aftok.Currency.Zcash (Zatoshi (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1115"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Bitcoin (satoshi)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:779"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":28,"ins":{"up_context":[{"change":4,"pos":900}],"down_context":[{"change":4,"pos":1012}],"flag":"BLOCK","start":1117,"end":1271,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":900},"to":{"change":4,"start":900,"end":1012},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"import Aftok.Payments.Bitcoin (BillingOps (..), PaymentsConfig)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1180"}},{"Add":{"text":"import qualified Aftok.Payments.Types as P","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1223"}},{"Add":{"text":"import qualified Aftok.Payments.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1270"}}],"del_contents":[{"Del":{"text":"import Aftok.Payments.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:927"}},{"Del":{"text":" ( PaymentKey (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:948"}},{"Del":{"text":" paymentKey,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:964"}},{"Del":{"text":" paymentRequestTotal,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:989"}},{"Del":{"text":" subscription,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:1007"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:1011"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":42,"ins":{"up_context":[{"change":4,"pos":1173}],"down_context":[{"change":4,"pos":1237}],"flag":"BLOCK","start":1272,"end":1316,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":1173},"to":{"change":4,"start":1173,"end":1237},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"import Control.Error.Util (exceptT, maybeT)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1315"}}],"del_contents":[{"Del":{"text":"import Bippy.Types (Satoshi)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:1201"}},{"Del":{"text":"import Control.Error.Util (maybeT)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:1236"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":44,"ins":{"up_context":[{"change":4,"pos":1257}],"down_context":[{"change":4,"pos":1267}],"flag":"BLOCK","start":1317,"end":1366,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":1257},"to":{"change":4,"start":1257,"end":1267},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" ( (.~),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1326"}},{"Add":{"text":" Iso',","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1336"}},{"Add":{"text":" (^.),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1346"}},{"Add":{"text":" from,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1356"}},{"Add":{"text":" iso,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1365"}}],"del_contents":[{"Del":{"text":" ( (^.),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:1266"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":51,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":1305}],"down_context":[{"change":4,"pos":1305}],"flag":"BLOCK","start":1367,"end":1386,"inode":{"change":5,"pos":1458}}},"contents":[{"Add":{"text":" over,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1376"}},{"Add":{"text":" set,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1385"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":92,"ins":{"up_context":[{"change":5,"pos":3207}],"down_context":[{"change":5,"pos":3383}],"flag":"BLOCK","start":1387,"end":1575,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3207},"to":{"change":5,"start":3207,"end":3297},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3297},"to":{"change":4,"start":1995,"end":2033},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":2033},"to":{"change":5,"start":3335,"end":3383},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4254},"to":{"change":5,"start":3335,"end":3383},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3335},"to":{"change":5,"start":3335,"end":3383},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"-- instance P.AsPaymentError AftokDErr where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1431"}},{"Add":{"text":"-- _PaymentError = _PaymentErr . P._PaymentError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1482"}},{"Add":{"text":"-- _Overdue = _PaymentErr . P._Overdue","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1523"}},{"Add":{"text":"-- _SigningError = _PaymentErr . P._SigningError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1574"}}],"del_contents":[{"Del":{"text":"instance P.AsPaymentError AftokDErr where","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:3248"}},{"Del":{"text":" _PaymentError = _PaymentErr . P._PaymentError","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:3296"}},{"Del":{"text":" _Overdue = _PaymentErr . P._Overdue","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2032"}},{"Del":{"text":" _SigningError = _PaymentErr . P._SigningError","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:3382"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":101,"ins":{"up_context":[{"change":4,"pos":2121}],"down_context":[{"change":4,"pos":2156}],"flag":"BLOCK","start":1576,"end":1609,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":2121},"to":{"change":4,"start":2121,"end":2156},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" _pcfg :: !PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1608"}}],"del_contents":[{"Del":{"text":" _pcfg :: !P.PaymentsConfig","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2155"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":106,"ins":{"up_context":[{"change":5,"pos":3519}],"down_context":[{"change":5,"pos":3681}],"flag":"BLOCK","start":1610,"end":1795,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3519},"to":{"change":5,"start":3519,"end":3564},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3564},"to":{"change":4,"start":2166,"end":2267},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":2267},"to":{"change":5,"start":3657,"end":3681},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4370},"to":{"change":5,"start":3657,"end":3681},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3657},"to":{"change":5,"start":3657,"end":3681},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"-- instance P.HasPaymentsConfig AftokMEnv where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1657"}},{"Add":{"text":"-- networkMode = pcfg . P.networkMode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1697"}},{"Add":{"text":"-- signingKey = pcfg . P.signingKey","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1735"}},{"Add":{"text":"-- pkiData = pcfg . P.pkiData","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1767"}},{"Add":{"text":"-- paymentsConfig = pcfg","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1794"}}],"del_contents":[{"Del":{"text":"instance P.HasPaymentsConfig AftokMEnv where","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:3563"}},{"Del":{"text":" networkMode = pcfg . P.networkMode","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2202"}},{"Del":{"text":" signingKey = pcfg . P.signingKey","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2237"}},{"Del":{"text":" pkiData = pcfg . P.pkiData","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2266"}},{"Del":{"text":" paymentsConfig = pcfg","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:3680"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":139,"ins":{"up_context":[{"change":5,"pos":4543}],"down_context":[{"change":5,"pos":4593}],"flag":"BLOCK","start":1796,"end":1858,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4543},"to":{"change":5,"start":4543,"end":4593},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" traverse_ createProjectSubscriptionPaymentRequests projects","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1857"}}],"del_contents":[{"Del":{"text":" traverse_ createProjectPaymentRequests projects","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:4592"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":141,"ins":{"up_context":[{"change":5,"pos":4594}],"down_context":[{"change":5,"pos":4467}],"flag":"BLOCK","start":1859,"end":1976,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4594},"to":{"change":5,"start":4594,"end":4687},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"createProjectSubscriptionPaymentRequests :: ProjectId -> AftokM ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1925"}},{"Add":{"text":"createProjectSubscriptionPaymentRequests pid = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1975"}}],"del_contents":[{"Del":{"text":"createProjectPaymentRequests :: ProjectId -> AftokM ()","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:4648"}},{"Del":{"text":"createProjectPaymentRequests pid = do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:4686"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":144,"ins":{"up_context":[{"change":5,"pos":4500}],"down_context":[{"change":5,"pos":4569}],"flag":"BLOCK","start":1977,"end":2179,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4500},"to":{"change":5,"start":4500,"end":4569},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" btcCfg <- asks _pcfg","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:1999"}},{"Add":{"text":" let btcOps = BillingOps _memoGen (fmap Just . bip70PaymentURL) _payloadGen","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2076"}},{"Add":{"text":" zecCfg = Zcash.PaymentsConfig (Zatoshi 100)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2126"}},{"Add":{"text":" pcfg' = P.PaymentsConfig btcOps btcCfg zecCfg","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2178"}}],"del_contents":[{"Del":{"text":" let ops = P.BillingOps memoGen (fmap Just . paymentURL) payloadGen","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:4568"}}]}},{"Edit":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":149,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":4620}],"down_context":[{"change":4,"pos":2353}],"flag":"BLOCK","start":2180,"end":2256,"inode":{"change":5,"pos":1458}}},"contents":[{"Add":{"text":" subscriptions <- join <$> traverse (DB.findSubscriptions pid) subscribers","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2255"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":151,"ins":{"up_context":[{"change":4,"pos":2367}],"down_context":[{"change":5,"pos":4989}],"flag":"BLOCK","start":2257,"end":2468,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":2367},"to":{"change":5,"start":4637,"end":4766},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4637},"to":{"change":5,"start":4637,"end":4766},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" fmap join","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2270"}},{"Add":{"text":" . exceptT (throwError . PaymentErr) pure","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2317"}},{"Add":{"text":" $ traverse (\\s -> fmap (snd s,) <$> P.createSubscriptionPaymentRequests pcfg' now s) subscriptions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2422"}},{"Add":{"text":" traverse_ sendPaymentRequestEmail requests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2467"}}],"del_contents":[{"Del":{"text":" traverse (\\uid -> P.createPaymentRequests ops now uid pid) $ subscribers","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:4713"}},{"Del":{"text":" traverse_ sendPaymentRequestEmail (join requests)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:4765"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":156,"ins":{"up_context":[{"change":5,"pos":4990}],"down_context":[{"change":5,"pos":5084}],"flag":"BLOCK","start":2469,"end":2781,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4990},"to":{"change":5,"start":4990,"end":5084},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"_Compose :: Iso' (f (g a)) (Compose f g a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2511"}},{"Add":{"text":"_Compose = iso Compose getCompose","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2545"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2546"}},{"Add":{"text":"-- | TODO: Currently will only send email for bip70 requests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2607"}},{"Add":{"text":"sendPaymentRequestEmail :: (B.Subscription, (P.PaymentRequestId, P.SomePaymentRequestDetail)) -> AftokM ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2714"}},{"Add":{"text":"sendPaymentRequestEmail (sub, (_, P.SomePaymentRequest req)) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2780"}}],"del_contents":[{"Del":{"text":"sendPaymentRequestEmail :: P.PaymentRequestId -> AftokM ()","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5048"}},{"Del":{"text":"sendPaymentRequestEmail reqId = do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5083"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":165,"ins":{"up_context":[{"change":4,"pos":2423}],"down_context":[{"change":5,"pos":1180}],"flag":"BLOCK","start":2782,"end":3366,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":2423},"to":{"change":4,"start":2423,"end":2563},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":2563},"to":{"change":5,"start":5347,"end":5501},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5044},"to":{"change":5,"start":5347,"end":5501},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5347},"to":{"change":5,"start":5347,"end":5501},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5501},"to":{"change":4,"start":2564,"end":2632},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":2632},"to":{"change":5,"start":5569,"end":5614},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5118},"to":{"change":5,"start":5569,"end":5614},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5569},"to":{"change":5,"start":5569,"end":5614},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5614},"to":{"change":4,"start":2633,"end":2829},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1179},"to":{"change":5,"start":5762,"end":5805},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":2829},"to":{"change":5,"start":5762,"end":5805},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5323},"to":{"change":5,"start":5762,"end":5805},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5762},"to":{"change":5,"start":5762,"end":5805},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" req' = over P.billable (\\b -> Compose $ sub & B.billable .~ b) req","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2854"}},{"Add":{"text":" req'' <- enrichWithUser req'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2885"}},{"Add":{"text":" req''' <- enrichWithProject req''","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2921"}},{"Add":{"text":" case req''' ^. P.nativeRequest of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2957"}},{"Add":{"text":" P.Bip70Request nreq -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:2987"}},{"Add":{"text":" bip70URL <- bip70PaymentURL (nreq ^. Bitcoin.paymentRequestKey)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3057"}},{"Add":{"text":" mail <- buildBip70PaymentRequestEmail preqCfg req''' bip70URL","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3125"}},{"Add":{"text":" let mailer =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3144"}},{"Add":{"text":" maybe","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3162"}},{"Add":{"text":" (SMTP.sendMailWithLogin _smtpHost)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3211"}},{"Add":{"text":" (SMTP.sendMailWithLogin' _smtpHost)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3261"}},{"Add":{"text":" _smtpPort","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3285"}},{"Add":{"text":" liftIO $ mailer _smtpUser _smtpPass mail","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3332"}},{"Add":{"text":" P.Zip321Request _ -> pure ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3365"}}],"del_contents":[{"Del":{"text":" reqMay = do","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2440"}},{"Del":{"text":" preq <- DB.findPaymentRequestId reqId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2486"}},{"Del":{"text":" preq' <- traverseOf P.subscription DB.findSubscriptionBillable preq","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2562"}},{"Del":{"text":" preq'' <- traverseOf (P.subscription . customer) DB.findUser preq'","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5421"}},{"Del":{"text":" traverseOf (P.subscription . billable . project) DB.findProject preq''","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5500"}},{"Del":{"text":" req <- maybeT (throwError $ DBErr DB.SubjectNotFound) pure reqMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2631"}},{"Del":{"text":" bip70URL <- paymentURL (req ^. paymentKey)","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5613"}},{"Del":{"text":" mail <- buildPaymentRequestEmail preqCfg req bip70URL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2688"}},{"Del":{"text":" let mailer =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2703"}},{"Del":{"text":" maybe","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2717"}},{"Del":{"text":" (SMTP.sendMailWithLogin _smtpHost)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2762"}},{"Del":{"text":" (SMTP.sendMailWithLogin' _smtpHost)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2808"}},{"Del":{"text":" _smtpPort","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2828"}},{"Del":{"text":" liftIO $ mailer _smtpUser _smtpPass mail","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:5804"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":180,"ins":{"up_context":[{"change":5,"pos":1181}],"down_context":[{"change":4,"pos":2858}],"flag":"BLOCK","start":3367,"end":4219,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1181},"to":{"change":4,"start":2830,"end":2858},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"enrichWithUser ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3384"}},{"Add":{"text":" P.PaymentRequest' (Compose (Subscription' UserId) (Billable' p u)) a ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3458"}},{"Add":{"text":" AftokM (P.PaymentRequest' (Compose (Subscription' User) (Billable' p u)) a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3536"}},{"Add":{"text":"enrichWithUser req = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3560"}},{"Add":{"text":" let sub = req ^. P.billable . from _Compose","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3606"}},{"Add":{"text":" sub' <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3616"}},{"Add":{"text":" maybeT (throwError $ DBErr DB.SubjectNotFound) pure $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3674"}},{"Add":{"text":" traverseOf customer DB.findUser sub","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3716"}},{"Add":{"text":" pure (set P.billable (Compose sub') req)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3759"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3760"}},{"Add":{"text":"enrichWithProject ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3781"}},{"Add":{"text":" P.PaymentRequest' (Compose (Subscription' u) (Billable' ProjectId u')) a ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3859"}},{"Add":{"text":" AftokM (P.PaymentRequest' (Compose (Subscription' u) (Billable' Project u')) a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3941"}},{"Add":{"text":"enrichWithProject req = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:3968"}},{"Add":{"text":" let sub = req ^. P.billable . from _Compose","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4014"}},{"Add":{"text":" sub' <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4024"}},{"Add":{"text":" maybeT (throwError $ DBErr DB.SubjectNotFound) pure $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4082"}},{"Add":{"text":" traverseOf (B.billable . project) DB.findProject sub","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4141"}},{"Add":{"text":" pure (set P.billable (Compose sub') req)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4184"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4185"}},{"Add":{"text":"buildBip70PaymentRequestEmail ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4218"}}],"del_contents":[{"Del":{"text":"buildPaymentRequestEmail ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:2857"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":203,"ins":{"up_context":[{"change":4,"pos":2927}],"down_context":[{"change":4,"pos":3006}],"flag":"BLOCK","start":4220,"end":4309,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":2927},"to":{"change":4,"start":2927,"end":3006},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" P.PaymentRequest' (Compose (Subscription' User) (Billable' Project UserId)) Satoshi ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4308"}}],"del_contents":[{"Del":{"text":" P.PaymentRequest' (Subscription' User (Billable' Project UserId Satoshi)) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3005"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":206,"ins":{"up_context":[{"change":4,"pos":3029}],"down_context":[{"change":5,"pos":6141}],"flag":"BLOCK","start":4310,"end":4364,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":1348},"to":{"change":5,"start":6092,"end":6141},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":3029},"to":{"change":5,"start":6092,"end":6141},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5584},"to":{"change":5,"start":6092,"end":6141},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6092},"to":{"change":5,"start":6092,"end":6141},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"buildBip70PaymentRequestEmail cfg req paymentUrl = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4363"}}],"del_contents":[{"Del":{"text":"buildPaymentRequestEmail cfg req paymentUrl = do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:6140"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":210,"ins":{"up_context":[{"change":5,"pos":5635}],"down_context":[{"change":5,"pos":6326}],"flag":"BLOCK","start":4365,"end":4458,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5635},"to":{"change":5,"start":5635,"end":5653},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5653},"to":{"change":4,"start":3030,"end":3099},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" <$> (req ^. P.billable . to getCompose . B.billable . paymentRequestEmailTemplate)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4457"}}],"del_contents":[{"Del":{"text":" <$> req","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:5652"}},{"Del":{"text":" ^. (subscription . billable . paymentRequestEmailTemplate)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3098"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":216,"ins":{"up_context":[{"change":5,"pos":3346}],"down_context":[{"change":5,"pos":3410}],"flag":"BLOCK","start":4459,"end":4537,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3346},"to":{"change":5,"start":3346,"end":3410},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" toEmail <- case req ^. (P.billable . to getCompose . contactChannel) of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4536"}}],"del_contents":[{"Del":{"text":" toEmail <- case req ^. (subscription . contactChannel) of","pos":"ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC:3409"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":220,"ins":{"up_context":[{"change":5,"pos":6596}],"down_context":[{"change":4,"pos":3275}],"flag":"BLOCK","start":4538,"end":4705,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6596},"to":{"change":4,"start":3131,"end":3275},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" pname = req ^. P.billable . to getCompose . B.billable . B.project . projectName","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4628"}},{"Add":{"text":" total = req ^. P.billable . to getCompose . B.billable . B.amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4704"}}],"del_contents":[{"Del":{"text":" pname = req ^. (subscription . billable . project . projectName)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3205"}},{"Del":{"text":" total = req ^. (P.paymentRequest . to paymentRequestTotal)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3274"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":227,"ins":{"up_context":[{"change":4,"pos":3465}],"down_context":[{"change":4,"pos":3522}],"flag":"BLOCK","start":4706,"end":4764,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":3465},"to":{"change":4,"start":3465,"end":3522},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" (\"amount_due\", show $ total ^. _Satoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4763"}}],"del_contents":[{"Del":{"text":" (\"amount_due\", show $ total ^. satoshi),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3521"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":236,"ins":{"up_context":[{"change":5,"pos":7418}],"down_context":[{"change":5,"pos":6448}],"flag":"BLOCK","start":4765,"end":4960,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7418},"to":{"change":4,"start":3786,"end":3874},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":3874},"to":{"change":5,"start":7531,"end":7639},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6447},"to":{"change":5,"start":7531,"end":7639},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7531},"to":{"change":5,"start":7531,"end":7639},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"_memoGen ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4776"}},{"Add":{"text":" DB.MonadDB m =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4794"}},{"Add":{"text":" Billable Satoshi ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4816"}},{"Add":{"text":" C.Day ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4827"}},{"Add":{"text":" C.UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4842"}},{"Add":{"text":" m (Maybe Text)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4859"}},{"Add":{"text":"_memoGen bill billingDate requestTime = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4902"}},{"Add":{"text":" req <- traverseOf B.project DB.findProjectOrError bill","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:4959"}}],"del_contents":[{"Del":{"text":"memoGen ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3796"}},{"Del":{"text":" Subscription' UserId Billable -> C.Day -> C.UTCTime -> AftokM (Maybe Text)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3873"}},{"Del":{"text":"memoGen sub billingDate requestTime = do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:7571"}},{"Del":{"text":" req <- traverseOf (billable . project) DB.findProjectOrError sub","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:7638"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":246,"ins":{"up_context":[{"change":5,"pos":6494}],"down_context":[{"change":4,"pos":3875}],"flag":"BLOCK","start":4961,"end":5012,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6494},"to":{"change":5,"start":6494,"end":6557},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" <$> (bill ^. paymentRequestMemoTemplate)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5011"}}],"del_contents":[{"Del":{"text":" <$> (sub ^. (billable . paymentRequestMemoTemplate))","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:6556"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":249,"ins":{"up_context":[{"change":4,"pos":3914}],"down_context":[{"change":4,"pos":4043}],"flag":"BLOCK","start":5013,"end":5120,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":3914},"to":{"change":4,"start":3914,"end":4043},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" [ (\"project_name\", req ^. B.project . projectName),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5074"}},{"Add":{"text":" (\"subscription\", req ^. B.name),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5119"}}],"del_contents":[{"Del":{"text":" [ (\"project_name\", req ^. (billable . project . projectName)),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:3986"}},{"Del":{"text":" (\"subscription\", req ^. (billable . name)),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:4042"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":258,"ins":{"up_context":[{"change":5,"pos":8127}],"down_context":[{"change":5,"pos":8197}],"flag":"BLOCK","start":5121,"end":5217,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8127},"to":{"change":5,"start":8127,"end":8197},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"bip70PaymentURL :: Bitcoin.PaymentKey -> AftokM URI","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5172"}},{"Add":{"text":"bip70PaymentURL (Bitcoin.PaymentKey k) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5216"}}],"del_contents":[{"Del":{"text":"paymentURL :: PaymentKey -> AftokM URI","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:8165"}},{"Del":{"text":"paymentURL (PaymentKey k) = do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:8196"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":273,"ins":{"up_context":[{"change":5,"pos":8505}],"down_context":[{"change":4,"pos":4371}],"flag":"BLOCK","start":5218,"end":5233,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8505},"to":{"change":4,"start":4357,"end":4371},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"_payloadGen ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5232"}}],"del_contents":[{"Del":{"text":"payloadGen ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:4370"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":275,"ins":{"up_context":[{"change":4,"pos":4384}],"down_context":[{"change":4,"pos":4419}],"flag":"BLOCK","start":5234,"end":5256,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":4384},"to":{"change":4,"start":4384,"end":4419},"introduced_by":4}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":" Billable Satoshi ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5255"}}],"del_contents":[{"Del":{"text":" Subscription' UserId Billable ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:4418"}}]}},{"Replacement":{"inode":{"change":5,"pos":1458},"path":"daemon/AftokD/AftokM.hs","line":279,"ins":{"up_context":[{"change":4,"pos":4468}],"down_context":[],"flag":"BLOCK","start":5257,"end":5290,"inode":{"change":5,"pos":1458}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":1018},"to":{"change":5,"start":8606,"end":8638},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":4468},"to":{"change":5,"start":8606,"end":8638},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6922},"to":{"change":5,"start":8606,"end":8638},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8606},"to":{"change":5,"start":8606,"end":8638},"introduced_by":5}],"inode":{"change":5,"pos":1458}},"ins_contents":[{"Add":{"text":"_payloadGen _ _ _ = pure Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5289"}}],"del_contents":[{"Del":{"text":"payloadGen _ _ _ = pure Nothing","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:8637"}}]}},{"Replacement":{"inode":{"change":5,"pos":5084},"path":"lib/Aftok/Auction.hs","line":6,"ins":{"up_context":[{"change":4,"pos":5664}],"down_context":[{"change":4,"pos":5677}],"flag":"BLOCK","start":5294,"end":5308,"inode":{"change":5,"pos":5084}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":5664},"to":{"change":4,"start":5664,"end":5677},"introduced_by":4}],"inode":{"change":5,"pos":5084}},"ins_contents":[{"Add":{"text":" ( _Satoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5307"}}],"del_contents":[{"Del":{"text":" ( satoshi,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:5676"}}]}},{"Replacement":{"inode":{"change":5,"pos":5084},"path":"lib/Aftok/Auction.hs","line":72,"ins":{"up_context":[{"change":4,"pos":6617}],"down_context":[{"change":4,"pos":6671}],"flag":"BLOCK","start":5309,"end":5364,"inode":{"change":5,"pos":5084}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":6617},"to":{"change":4,"start":6617,"end":6671},"introduced_by":4}],"inode":{"change":5,"pos":5084}},"ins_contents":[{"Add":{"text":" btc bid = toRational $ bid ^. bidAmount . _Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5363"}}],"del_contents":[{"Del":{"text":" btc bid = toRational $ bid ^. bidAmount . satoshi","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:6670"}}]}},{"Replacement":{"inode":{"change":5,"pos":5084},"path":"lib/Aftok/Auction.hs","line":88,"ins":{"up_context":[{"change":4,"pos":7089}],"down_context":[{"change":4,"pos":7152}],"flag":"BLOCK","start":5365,"end":5429,"inode":{"change":5,"pos":5084}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":7089},"to":{"change":4,"start":7089,"end":7152},"introduced_by":4}],"inode":{"change":5,"pos":5084}},"ins_contents":[{"Add":{"text":" let winFraction r = r % (bid ^. bidAmount . _Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5428"}}],"del_contents":[{"Del":{"text":" let winFraction r = r % (bid ^. bidAmount . satoshi)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:7151"}}]}},{"Replacement":{"inode":{"change":5,"pos":5084},"path":"lib/Aftok/Auction.hs","line":114,"ins":{"up_context":[{"change":4,"pos":7900}],"down_context":[{"change":4,"pos":7961}],"flag":"BLOCK","start":5430,"end":5492,"inode":{"change":5,"pos":5084}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":7900},"to":{"change":4,"start":7900,"end":7961},"introduced_by":4}],"inode":{"change":5,"pos":5084}},"ins_contents":[{"Add":{"text":" let winFraction r = r % (bid ^. bidAmount . _Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5491"}}],"del_contents":[{"Del":{"text":" let winFraction r = r % (bid ^. bidAmount . satoshi)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:7960"}}]}},{"Edit":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":4,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1016},"to":{"change":4,"start":8244,"end":8276},"introduced_by":4}],"inode":{"change":5,"pos":760}}},"contents":[{"Del":{"text":"{-# LANGUAGE ExplicitForAll #-}","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8275"}}]}},{"Edit":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":9,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":8356},"to":{"change":4,"start":8356,"end":8385},"introduced_by":4}],"inode":{"change":5,"pos":760}}},"contents":[{"Del":{"text":"import Bippy.Types (Satoshi)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8384"}}]}},{"Edit":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":14,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":982},"to":{"change":5,"start":982,"end":1039},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1039},"to":{"change":4,"start":8527,"end":8528},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":8528},"to":{"change":5,"start":188,"end":212},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1039},"to":{"change":5,"start":188,"end":212},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":212},"to":{"change":5,"start":1040,"end":1041},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1040},"to":{"change":5,"start":1040,"end":1041},"introduced_by":5}],"inode":{"change":5,"pos":760}}},"contents":[{"Del":{"text":"newtype BillableId = BillableId UUID deriving (Show, Eq)","pos":"DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC:1038"}},{"Del":{"text":"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8527"}},{"Del":{"text":"makePrisms ''BillableId","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:211"}},{"Del":{"text":"","pos":"DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC:1040"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":52,"ins":{"up_context":[{"change":5,"pos":1085}],"down_context":[{"change":4,"pos":8808}],"flag":"BLOCK","start":5494,"end":5568,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1085},"to":{"change":4,"start":8787,"end":8808},"introduced_by":4}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":"-- | A potentially recurring billable amount.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5539"}},{"Add":{"text":"data Billable' p u currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5567"}}],"del_contents":[{"Del":{"text":"data Billable' p u c","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8807"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":58,"ins":{"up_context":[{"change":4,"pos":8890}],"down_context":[{"change":4,"pos":8920}],"flag":"BLOCK","start":5569,"end":5641,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":8890},"to":{"change":4,"start":8890,"end":8920},"introduced_by":4}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":" _description :: Maybe Text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5604"}},{"Add":{"text":" _messageText :: Maybe Text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5640"}}],"del_contents":[{"Del":{"text":" _description :: Text,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8919"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":61,"ins":{"up_context":[{"change":4,"pos":8955}],"down_context":[{"change":4,"pos":8977}],"flag":"BLOCK","start":5642,"end":5671,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":8955},"to":{"change":4,"start":8955,"end":8977},"introduced_by":4}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":" _amount :: currency,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5670"}}],"del_contents":[{"Del":{"text":" _amount :: c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:8976"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":63,"ins":{"up_context":[{"change":4,"pos":9007}],"down_context":[{"change":4,"pos":9064}],"flag":"BLOCK","start":5672,"end":5721,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":9007},"to":{"change":4,"start":9007,"end":9064},"introduced_by":4}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":" _requestExpiryPeriod :: NominalDiffTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5720"}}],"del_contents":[{"Del":{"text":" _requestExpiryPeriod :: Maybe C.NominalDiffTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:9063"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":70,"ins":{"up_context":[{"change":5,"pos":1730}],"down_context":[{"change":5,"pos":1421}],"flag":"BLOCK","start":5722,"end":5773,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1730},"to":{"change":5,"start":1370,"end":1421},"introduced_by":5}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":"type Billable amt = Billable' ProjectId UserId amt","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5772"}}],"del_contents":[{"Del":{"text":"type Billable = Billable' ProjectId UserId Satoshi","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:1420"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":72,"ins":{"up_context":[{"change":5,"pos":1422}],"down_context":[{"change":4,"pos":9176}],"flag":"BLOCK","start":5774,"end":5831,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":1422},"to":{"change":5,"start":964,"end":1029},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1730},"to":{"change":5,"start":964,"end":1029},"introduced_by":5}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":"newtype BillableId = BillableId UUID deriving (Show, Eq)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5830"}}],"del_contents":[{"Del":{"text":"newtype SubscriptionId = SubscriptionId UUID deriving (Show, Eq)","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:1028"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":74,"ins":{"up_context":[{"change":4,"pos":9177}],"down_context":[{"change":5,"pos":3662}],"flag":"BLOCK","start":5832,"end":5856,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":9177},"to":{"change":5,"start":34,"end":62},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1029},"to":{"change":5,"start":34,"end":62},"introduced_by":5}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":"makePrisms ''BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5855"}}],"del_contents":[{"Del":{"text":"makePrisms ''SubscriptionId","pos":"Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC:61"}}]}},{"Edit":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":79,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":1424}],"down_context":[{"change":4,"pos":9178}],"flag":"BLOCK","start":5857,"end":6029,"inode":{"change":5,"pos":760}}},"contents":[{"Add":{"text":"-- | An association between a customer and a (potentially recurring) billable amount.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5942"}},{"Add":{"text":"--","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:5945"}},{"Add":{"text":"-- For one-time billing events, the end date should be the same as the start date.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6028"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":87,"ins":{"up_context":[{"change":4,"pos":9309}],"down_context":[{"change":4,"pos":9378}],"flag":"BLOCK","start":6030,"end":6095,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":9309},"to":{"change":4,"start":9309,"end":9378},"introduced_by":4}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":" _startTime :: UTCTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6060"}},{"Add":{"text":" _endTime :: Maybe UTCTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6094"}}],"del_contents":[{"Del":{"text":" _startTime :: C.UTCTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:9341"}},{"Del":{"text":" _endTime :: Maybe C.UTCTime","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:9377"}}]}},{"Edit":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":94,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":242}],"down_context":[{"change":5,"pos":1659}],"flag":"BLOCK","start":6096,"end":6191,"inode":{"change":5,"pos":760}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6096"}},{"Add":{"text":"newtype SubscriptionId = SubscriptionId UUID deriving (Show, Eq)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6161"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6162"}},{"Add":{"text":"makePrisms ''SubscriptionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6190"}}]}},{"Replacement":{"inode":{"change":5,"pos":760},"path":"lib/Aftok/Billing.hs","line":109,"ins":{"up_context":[{"change":5,"pos":457}],"down_context":[{"change":5,"pos":840}],"flag":"BLOCK","start":6192,"end":6263,"inode":{"change":5,"pos":760}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":457},"to":{"change":5,"start":243,"end":308},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":787},"to":{"change":5,"start":243,"end":308},"introduced_by":5}],"inode":{"change":5,"pos":760}},"ins_contents":[{"Add":{"text":"billingSchedule :: forall u a. Subscription' u (Billable a) -> [T.Day]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6262"}}],"del_contents":[{"Del":{"text":"billingSchedule :: forall u. Subscription' u Billable -> [T.Day]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:307"}}]}},{"Replacement":{"inode":{"change":5,"pos":10763},"path":"lib/Aftok/Config.hs","line":5,"ins":{"up_context":[{"change":5,"pos":10875}],"down_context":[{"change":4,"pos":9592}],"flag":"BLOCK","start":6265,"end":6374,"inode":{"change":5,"pos":10763}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10875},"to":{"change":4,"start":9504,"end":9592},"introduced_by":4}],"inode":{"change":5,"pos":10763}},"ins_contents":[{"Add":{"text":"import Aftok.Currency.Bitcoin (NetworkMode, Satoshi (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6322"}},{"Add":{"text":"import qualified Aftok.Payments.Bitcoin as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6373"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Bitcoin (NetworkMode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:9547"}},{"Del":{"text":"import Aftok.Payments (PaymentsConfig (..))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:9591"}}]}},{"Replacement":{"inode":{"change":5,"pos":10763},"path":"lib/Aftok/Config.hs","line":44,"ins":{"up_context":[{"change":4,"pos":10453}],"down_context":[{"change":4,"pos":10495}],"flag":"BLOCK","start":6375,"end":6449,"inode":{"change":5,"pos":10763}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":10453},"to":{"change":4,"start":10453,"end":10495},"introduced_by":4}],"inode":{"change":5,"pos":10763}},"ins_contents":[{"Add":{"text":" _exchangeRateServiceURI :: String,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6417"}},{"Add":{"text":" _minPayment :: Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6448"}}],"del_contents":[{"Del":{"text":" _exchangeRateServiceURI :: String","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:10494"}}]}},{"Edit":{"inode":{"change":5,"pos":10763},"path":"lib/Aftok/Config.hs","line":65,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":11989}],"down_context":[{"change":5,"pos":12593}],"flag":"BLOCK","start":6450,"end":6509,"inode":{"change":5,"pos":10763}}},"contents":[{"Add":{"text":" <*> (Satoshi <$> C.lookupDefault 100 cfg \"minPayment\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6508"}}]}},{"Replacement":{"inode":{"change":5,"pos":10763},"path":"lib/Aftok/Config.hs","line":76,"ins":{"up_context":[{"change":5,"pos":12867}],"down_context":[{"change":5,"pos":12922}],"flag":"BLOCK","start":6510,"end":6573,"inode":{"change":5,"pos":10763}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12867},"to":{"change":5,"start":12867,"end":12922},"introduced_by":5}],"inode":{"change":5,"pos":10763}},"ins_contents":[{"Add":{"text":"toPaymentsConfig :: BillingConfig -> IO Bitcoin.PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6572"}}],"del_contents":[{"Del":{"text":"toPaymentsConfig :: BillingConfig -> IO PaymentsConfig","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:12921"}}]}},{"Replacement":{"inode":{"change":5,"pos":10763},"path":"lib/Aftok/Config.hs","line":91,"ins":{"up_context":[{"change":5,"pos":13405}],"down_context":[],"flag":"BLOCK","start":6574,"end":6657,"inode":{"change":5,"pos":10763}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13405},"to":{"change":5,"start":4189,"end":4248},"introduced_by":5}],"inode":{"change":5,"pos":10763}},"ins_contents":[{"Add":{"text":" pure $ Bitcoin.PaymentsConfig (c ^. networkMode) privKey pkiData (_minPayment c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6656"}}],"del_contents":[{"Del":{"text":" pure $ PaymentsConfig (c ^. networkMode) privKey pkiData","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4247"}}]}},{"FileAdd":{"meta":{"basename":"Bitcoin","metadata":576},"context":[{"change":5,"pos":4250}],"contents":[]}},{"FileAdd":{"meta":{"basename":"Bip70.hs","metadata":0},"context":[{"change":0,"pos":6659}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6713"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6714"}},{"Add":{"text":"module Aftok.Currency.Bitcoin.Bip70","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6750"}},{"Add":{"text":" ( module Bippy.Proto,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6774"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6778"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6784"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6785"}},{"Add":{"text":"import Bippy.Proto","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6804"}}]}},{"FileAdd":{"meta":{"basename":"Payments.hs","metadata":0},"context":[{"change":0,"pos":6659}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6874"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6875"}},{"Add":{"text":"module Aftok.Currency.Bitcoin.Payments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6914"}},{"Add":{"text":" ( PaymentKey (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6935"}},{"Add":{"text":" _PaymentKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6952"}},{"Add":{"text":" Payment (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6970"}},{"Add":{"text":" PaymentRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:6995"}},{"Add":{"text":" amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7007"}},{"Add":{"text":" txid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7017"}},{"Add":{"text":" address,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7030"}},{"Add":{"text":" bip70Payment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7048"}},{"Add":{"text":" paymentKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7064"}},{"Add":{"text":" bip70Request,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7082"}},{"Add":{"text":" paymentRequestKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7105"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7109"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7115"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7116"}},{"Add":{"text":"import qualified Bippy.Proto as B","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7150"}},{"Add":{"text":"import Bippy.Types (Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7179"}},{"Add":{"text":"import Control.Lens (makeLenses, makePrisms)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7224"}},{"Add":{"text":"import Haskoin.Address (Address (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7262"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7263"}},{"Add":{"text":"-- A unique identifier for a payment request, suitable","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7318"}},{"Add":{"text":"-- for URL embedding.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7340"}},{"Add":{"text":"newtype PaymentKey = PaymentKey Text deriving (Eq)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7391"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7392"}},{"Add":{"text":"makePrisms ''PaymentKey","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7416"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7417"}},{"Add":{"text":"data PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7437"}},{"Add":{"text":" = PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7456"}},{"Add":{"text":" { _paymentRequestKey :: PaymentKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7498"}},{"Add":{"text":" _bip70Request :: B.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7540"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7548"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7549"}},{"Add":{"text":"makeLenses ''PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7577"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7578"}},{"Add":{"text":"data Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7591"}},{"Add":{"text":" = Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7603"}},{"Add":{"text":" { _amount :: Maybe Satoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7637"}},{"Add":{"text":" _txid :: Maybe Text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7666"}},{"Add":{"text":" _address :: Maybe Address,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7701"}},{"Add":{"text":" _paymentKey :: PaymentKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7736"}},{"Add":{"text":" _bip70Payment :: B.Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7771"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7779"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7780"}},{"Add":{"text":"makeLenses ''Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7801"}}]}},{"Replacement":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":5,"ins":{"up_context":[{"change":5,"pos":4406}],"down_context":[{"change":5,"pos":4442}],"flag":"BLOCK","start":7840,"end":8005,"inode":{"change":5,"pos":4272}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4406},"to":{"change":5,"start":4406,"end":4442},"introduced_by":5}],"inode":{"change":5,"pos":4272}},"ins_contents":[{"Add":{"text":"module Aftok.Currency.Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7869"}},{"Add":{"text":" ( Satoshi (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7887"}},{"Add":{"text":" _Satoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7901"}},{"Add":{"text":" ssub,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7911"}},{"Add":{"text":" NetworkMode (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7933"}},{"Add":{"text":" renderNetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7956"}},{"Add":{"text":" parseNetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7978"}},{"Add":{"text":" getNetwork,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7994"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:7998"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8004"}}],"del_contents":[{"Del":{"text":"module Aftok.Currency.Bitcoin where","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4441"}}]}},{"Replacement":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":21,"ins":{"up_context":[{"change":5,"pos":4646}],"down_context":[{"change":5,"pos":4730}],"flag":"BLOCK","start":8006,"end":8092,"inode":{"change":5,"pos":4272}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4646},"to":{"change":5,"start":4646,"end":4730},"introduced_by":5}],"inode":{"change":5,"pos":4272}},"ins_contents":[{"Add":{"text":"_Satoshi :: Lens' Satoshi Word64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8038"}},{"Add":{"text":"_Satoshi inj (Satoshi value) = Satoshi <$> inj value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8091"}}],"del_contents":[{"Del":{"text":"satoshi :: Lens' Satoshi Word64","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4677"}},{"Del":{"text":"satoshi inj (Satoshi value) = Satoshi <$> inj value","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4729"}}]}},{"Edit":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":27,"atom":{"EdgeMap":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":11041},"to":{"change":5,"start":4858,"end":5009},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12575},"to":{"change":5,"start":4858,"end":5009},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4858},"to":{"change":5,"start":4858,"end":5009},"introduced_by":5}],"inode":{"change":5,"pos":4272}}},"contents":[{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4858"}},{"Del":{"text":"data NetworkId","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4873"}},{"Del":{"text":" = BTC","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4881"}},{"Del":{"text":" | BCH","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4889"}},{"Del":{"text":" deriving (Eq, Show, Ord)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4916"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4917"}},{"Del":{"text":"renderNetworkId :: NetworkId -> Text","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4954"}},{"Del":{"text":"renderNetworkId = \\case","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4978"}},{"Del":{"text":" BTC -> \"btc\"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:4993"}},{"Del":{"text":" BCH -> \"bch\"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5008"}}]}},{"Edit":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":28,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5010},"to":{"change":5,"start":5010,"end":5115},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5115},"to":{"change":4,"start":11042,"end":11057},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11057},"to":{"change":5,"start":5130,"end":5131},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12595},"to":{"change":5,"start":5130,"end":5131},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5130},"to":{"change":5,"start":5130,"end":5131},"introduced_by":5}],"inode":{"change":5,"pos":4272}}},"contents":[{"Del":{"text":"parseNetworkId :: Text -> Maybe NetworkId","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5051"}},{"Del":{"text":"parseNetworkId = \\case","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5074"}},{"Del":{"text":" \"btc\" -> Just BTC","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5094"}},{"Del":{"text":" \"bch\" -> Just BCH","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5114"}},{"Del":{"text":" _ -> Nothing","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11056"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5130"}}]}},{"Edit":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":31,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":5174}],"down_context":[{"change":5,"pos":5174}],"flag":"BLOCK","start":8093,"end":8203,"inode":{"change":5,"pos":4272}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8093"}},{"Add":{"text":"renderNetworkMode :: NetworkMode -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8134"}},{"Add":{"text":"renderNetworkMode = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8160"}},{"Add":{"text":" LiveMode -> \"live\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8181"}},{"Add":{"text":" TestMode -> \"test\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8202"}}]}},{"Replacement":{"inode":{"change":5,"pos":4272},"path":"lib/Aftok/Currency/Bitcoin.hs","line":47,"ins":{"up_context":[{"change":5,"pos":5421}],"down_context":[],"flag":"BLOCK","start":8204,"end":8300,"inode":{"change":5,"pos":4272}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5421},"to":{"change":5,"start":5421,"end":5668},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5668},"to":{"change":4,"start":11097,"end":11117},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11117},"to":{"change":5,"start":5688,"end":5712},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12675},"to":{"change":5,"start":5688,"end":5712},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5688},"to":{"change":5,"start":5688,"end":5712},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5712},"to":{"change":4,"start":11118,"end":11138},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11138},"to":{"change":5,"start":5732,"end":5756},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12700},"to":{"change":5,"start":5732,"end":5756},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5732},"to":{"change":5,"start":5732,"end":5756},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5756},"to":{"change":4,"start":11139,"end":11154},"introduced_by":4}],"inode":{"change":5,"pos":4272}},"ins_contents":[{"Add":{"text":"getNetwork :: NetworkMode -> Network","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8240"}},{"Add":{"text":"getNetwork = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8259"}},{"Add":{"text":" LiveMode -> btc","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8277"}},{"Add":{"text":" TestMode -> btcTest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8299"}}],"del_contents":[{"Del":{"text":"toNetwork :: NetworkMode -> NetworkId -> Network","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5469"}},{"Del":{"text":"toNetwork LiveMode = \\case","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5496"}},{"Del":{"text":" BTC -> btc","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5509"}},{"Del":{"text":" BCH -> bch","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5522"}},{"Del":{"text":"toNetwork TestMode = \\case","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5549"}},{"Del":{"text":" BTC -> btcTest","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5566"}},{"Del":{"text":" BCH -> bchTest","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5583"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5584"}},{"Del":{"text":"toNetworkId :: Network -> Maybe NetworkId","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5626"}},{"Del":{"text":"toNetworkId n = case getNetworkName n of","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5667"}},{"Del":{"text":" \"btc\" -> Just BTC","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11116"}},{"Del":{"text":" \"btcTest\" -> Just BTC","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5711"}},{"Del":{"text":" \"bch\" -> Just BCH","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11137"}},{"Del":{"text":" \"bchTest\" -> Just BCH","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:5755"}},{"Del":{"text":" _ -> Nothing","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11153"}}]}},{"FileAdd":{"meta":{"basename":"Zcash","metadata":576},"context":[{"change":5,"pos":4250}],"contents":[]}},{"FileAdd":{"meta":{"basename":"Payments.hs","metadata":0},"context":[{"change":0,"pos":8302}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8354"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8355"}},{"Add":{"text":"module Aftok.Currency.Zcash.Payments where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8398"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8399"}},{"Add":{"text":"import Aftok.Currency.Zcash.Types (Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8443"}},{"Add":{"text":"import Control.Lens (makeLenses, makePrisms)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8488"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8489"}},{"Add":{"text":"newtype TxId = TxId Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8514"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8515"}},{"Add":{"text":"makePrisms ''TxId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8533"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8534"}},{"Add":{"text":"data Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8547"}},{"Add":{"text":" = Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8559"}},{"Add":{"text":" { _amount :: Zatoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8587"}},{"Add":{"text":" _txid :: TxId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8609"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8617"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8618"}},{"Add":{"text":"makeLenses ''Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8639"}}]}},{"FileAdd":{"meta":{"basename":"Types.hs","metadata":0},"context":[{"change":0,"pos":8302}],"contents":[{"Add":{"text":"{-# LANGUAGE DerivingVia #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8707"}},{"Add":{"text":"{-# LANGUAGE GeneralizedNewtypeDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8751"}},{"Add":{"text":"{-# LANGUAGE StandaloneDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8787"}},{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8820"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8821"}},{"Add":{"text":"module Aftok.Currency.Zcash.Types where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8861"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8862"}},{"Add":{"text":"import Control.Lens (makePrisms)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8895"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8896"}},{"Add":{"text":"coin :: Word64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8911"}},{"Add":{"text":"coin = 100000000","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8928"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8929"}},{"Add":{"text":"maxMoney :: Word64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8948"}},{"Add":{"text":"maxMoney = 21000000 * coin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8975"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:8976"}},{"Add":{"text":"newtype IVK = IVK {ivkText :: Text}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9012"}},{"Add":{"text":" deriving (Eq, Ord, Show)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9039"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9040"}},{"Add":{"text":"makePrisms ''IVK","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9057"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9058"}},{"Add":{"text":"newtype Address = Address {zaddrText :: Text}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9104"}},{"Add":{"text":" deriving (Eq, Ord, Show)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9131"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9132"}},{"Add":{"text":"makePrisms ''Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9153"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9154"}},{"Add":{"text":"newtype Zatoshi = Zatoshi Word64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9187"}},{"Add":{"text":" deriving stock (Eq, Ord, Show)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9220"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9221"}},{"Add":{"text":"makePrisms ''Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9242"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9243"}},{"Add":{"text":"class ToZatoshi a where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9267"}},{"Add":{"text":" toZatoshi :: a -> Maybe Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9301"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9302"}},{"Add":{"text":"instance ToZatoshi Word64 where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9334"}},{"Add":{"text":" toZatoshi amt =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9352"}},{"Add":{"text":" if amt > maxMoney then Nothing else Just (Zatoshi amt)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9411"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9412"}},{"Add":{"text":"instance Semigroup Zatoshi where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9445"}},{"Add":{"text":" (Zatoshi a) <> (Zatoshi b) = Zatoshi (a + b)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9492"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9493"}},{"Add":{"text":"data ZAddrType","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9508"}},{"Add":{"text":" = Sprout","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9519"}},{"Add":{"text":" | Sapling","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9531"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9532"}},{"Add":{"text":"decodeAddrType :: Text -> Maybe ZAddrType","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9574"}},{"Add":{"text":"decodeAddrType = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9597"}},{"Add":{"text":" \"sprout\" -> Just Sprout","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9623"}},{"Add":{"text":" \"sapling\" -> Just Sapling","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9651"}},{"Add":{"text":" _ -> Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9666"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9667"}},{"Add":{"text":"newtype Memo = Memo ByteString","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9698"}}]}},{"FileAdd":{"meta":{"basename":"Zip321.hs","metadata":0},"context":[{"change":0,"pos":8302}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9767"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9768"}},{"Add":{"text":"module Aftok.Currency.Zcash.Zip321 where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9809"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9810"}},{"Add":{"text":"import Aftok.Currency.Zcash.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9844"}},{"Add":{"text":"import Control.Lens ((^.), makeLenses, makePrisms)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9895"}},{"Add":{"text":"import Data.Attoparsec.Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9923"}},{"Add":{"text":" ( Parser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9935"}},{"Add":{"text":" char,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9945"}},{"Add":{"text":" choice,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9957"}},{"Add":{"text":" decimal,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9970"}},{"Add":{"text":" option,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9982"}},{"Add":{"text":" parseOnly,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:9997"}},{"Add":{"text":" scientific,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10013"}},{"Add":{"text":" sepBy1,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10025"}},{"Add":{"text":" string,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10037"}},{"Add":{"text":" takeText,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10051"}},{"Add":{"text":" takeTill,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10065"}},{"Add":{"text":" takeWhile1,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10081"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10085"}},{"Add":{"text":"import Data.ByteString.Base64.URL (decodeBase64, encodeBase64Unpadded)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10156"}},{"Add":{"text":"import Data.Char (isAlpha, isAscii, isDigit)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10201"}},{"Add":{"text":"import Data.List.NonEmpty (zip)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10233"}},{"Add":{"text":"import qualified Data.Map.Strict as M","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10271"}},{"Add":{"text":"import Data.Scientific (toBoundedInteger)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10313"}},{"Add":{"text":"import Data.Text (any, intercalate, pack, unpack)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10363"}},{"Add":{"text":"import Network.URI.Encode (decodeText, encodeTextWith)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10418"}},{"Add":{"text":"import Text.Printf (printf)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10446"}},{"Add":{"text":"import Prelude hiding (any, intercalate, zip)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10492"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10493"}},{"Add":{"text":"data PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10510"}},{"Add":{"text":" = PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10526"}},{"Add":{"text":" { _address :: Address,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10555"}},{"Add":{"text":" _amount :: Zatoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10583"}},{"Add":{"text":" _memo :: Maybe Memo,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10612"}},{"Add":{"text":" _message :: Maybe Text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10644"}},{"Add":{"text":" _label :: Maybe Text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10674"}},{"Add":{"text":" _other :: [(Text, Text)] -- TODO: param name restrictions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10740"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10748"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10749"}},{"Add":{"text":"makeLenses ''PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10774"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10775"}},{"Add":{"text":"data PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10795"}},{"Add":{"text":" = PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10814"}},{"Add":{"text":" { _items :: NonEmpty PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10853"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10861"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10862"}},{"Add":{"text":"makeLenses ''PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10890"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10891"}},{"Add":{"text":"-- The set of ASCII characters that are excepted from percent-encoding according","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:10972"}},{"Add":{"text":"-- to the definition of ZIP 321.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11005"}},{"Add":{"text":"--","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11008"}},{"Add":{"text":"-- unreserved = ALPHA / DIGIT / \"-\" / \".\" / \"_\" / \"~\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11073"}},{"Add":{"text":"-- allowed-delims = \"!\" / \"$\" / \"'\" / \"(\" / \")\" / \"*\" / \"+\" / \",\" / \";\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11152"}},{"Add":{"text":"-- qchar = unreserved / pct-encoded / allowed-delims / \":\" / \"@\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11233"}},{"Add":{"text":"qchar :: Char -> Bool","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11255"}},{"Add":{"text":"qchar c =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11265"}},{"Add":{"text":" (isAscii c && isAlpha c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11292"}},{"Add":{"text":" || isDigit c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11309"}},{"Add":{"text":" || any (== c) \"-._!$'()*+,;:@\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11344"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11345"}},{"Add":{"text":"paramIndex :: Maybe Int -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11377"}},{"Add":{"text":"paramIndex = maybe \"\" (\\i -> pack (printf \".%d\" i)) . find (> 0)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11442"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11443"}},{"Add":{"text":"addrParam :: Maybe Int -> Address -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11485"}},{"Add":{"text":"addrParam i (Address t) = strParam \"address\" i t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11534"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11535"}},{"Add":{"text":"amountParam :: Maybe Int -> Zatoshi -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11579"}},{"Add":{"text":"amountParam i (Zatoshi value) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11611"}},{"Add":{"text":" \"amount\" <> paramIndex i <> \"=\" <> valueText","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11658"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11666"}},{"Add":{"text":" coins = value `div` coin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11695"}},{"Add":{"text":" zats = value `mod` coin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11723"}},{"Add":{"text":" valueText =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11739"}},{"Add":{"text":" pack $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11752"}},{"Add":{"text":" if zats == 0","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11773"}},{"Add":{"text":" then printf \"%d\" coins","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11806"}},{"Add":{"text":" else printf \"%d.%0.8d\" coins zats","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11850"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11851"}},{"Add":{"text":"strParam :: Text -> Maybe Int -> Text -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11897"}},{"Add":{"text":"strParam l i value =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11918"}},{"Add":{"text":" l <> paramIndex i <> \"=\" <> encodeTextWith qchar value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11975"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:11976"}},{"Add":{"text":"memoParam :: Maybe Int -> Memo -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12015"}},{"Add":{"text":"memoParam i (Memo bytes) = \"memo\" <> paramIndex i <> \"=\" <> encodeBase64Unpadded bytes","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12102"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12103"}},{"Add":{"text":"itemPartial :: Maybe Int -> PaymentItem -> [Text]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12153"}},{"Add":{"text":"itemPartial i item =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12174"}},{"Add":{"text":" catMaybes","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12186"}},{"Add":{"text":" [ Just $ amountParam i (item ^. amount),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12231"}},{"Add":{"text":" memoParam i <$> (item ^. memo),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12269"}},{"Add":{"text":" strParam \"message\" i <$> (item ^. message),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12319"}},{"Add":{"text":" strParam \"label\" i <$> (item ^. label)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12364"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12370"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12371"}},{"Add":{"text":"itemsParams :: NonEmpty PaymentItem -> NonEmpty Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12424"}},{"Add":{"text":"itemsParams xs =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12441"}},{"Add":{"text":" intercalate \"&\" . toList . itemParams <$> zip (Just <$> fromList [1 ..]) xs","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12519"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12527"}},{"Add":{"text":" itemParams (i, item) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12554"}},{"Add":{"text":" addrParam i (item ^. address) : itemPartial i item","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12611"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12612"}},{"Add":{"text":"toURI :: PaymentRequest -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12644"}},{"Add":{"text":"toURI req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12656"}},{"Add":{"text":" case req ^. items of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12679"}},{"Add":{"text":" i :| [] ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12694"}},{"Add":{"text":" \"zcash:\" <> zaddrText (i ^. address) <> \"?\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12744"}},{"Add":{"text":" <> intercalate \"&\" (itemPartial Nothing i)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12795"}},{"Add":{"text":" xs ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12805"}},{"Add":{"text":" \"zcash:?\" <> intercalate \"&\" (toList $ itemsParams xs)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12866"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12867"}},{"Add":{"text":"addrElem :: Char -> Bool","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12892"}},{"Add":{"text":"addrElem c = isDigit c || (isAscii c && isAlpha c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12943"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12944"}},{"Add":{"text":"data Zip321Param","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12961"}},{"Add":{"text":" = AddrParam Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:12983"}},{"Add":{"text":" | AmountParam Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13007"}},{"Add":{"text":" | MemoParam Memo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13026"}},{"Add":{"text":" | LabelParam Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13046"}},{"Add":{"text":" | MessageParam Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13068"}},{"Add":{"text":" | OtherParam Text Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13093"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13094"}},{"Add":{"text":"makePrisms ''Zip321Param","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13119"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13120"}},{"Add":{"text":"type IndexedParam = (Int, Zip321Param)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13159"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13160"}},{"Add":{"text":"zip321Parser :: Parser PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13198"}},{"Add":{"text":"zip321Parser = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13216"}},{"Add":{"text":" void $ string \"zcash:\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13241"}},{"Add":{"text":" addr0 <- toAddress <$> takeTill (== '?')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13284"}},{"Add":{"text":" params' <- sepBy1 zip321Param (char '&')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13327"}},{"Add":{"text":" let params = second (: []) <$> (toList addr0 <> params')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13386"}},{"Add":{"text":" grouped = M.fromListWith (<>) params","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13429"}},{"Add":{"text":" groups <- maybe (fail \"Parameter list was empty.\") pure (nonEmpty $ M.toAscList grouped)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13520"}},{"Add":{"text":" either (fail . unpack) (pure . PaymentRequest) $ traverse (toPaymentItem . snd) groups","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13609"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13617"}},{"Add":{"text":" toAddress addr =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13638"}},{"Add":{"text":" if addr == \"\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13658"}},{"Add":{"text":" then Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13679"}},{"Add":{"text":" else Just (0, AddrParam $ Address addr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13727"}},{"Add":{"text":" zip321Param =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13745"}},{"Add":{"text":" choice","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13758"}},{"Add":{"text":" [ parseAddrParam,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13784"}},{"Add":{"text":" parseAmountParam,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13812"}},{"Add":{"text":" parseMemoParam,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13838"}},{"Add":{"text":" parseLabelParam,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13865"}},{"Add":{"text":" parseMessageParam,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13894"}},{"Add":{"text":" parseOtherParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13920"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13930"}},{"Add":{"text":" toPaymentItem :: [Zip321Param] -> Either Text PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:13992"}},{"Add":{"text":" toPaymentItem = error \"Not yet implemented.\" --PaymentItem <$> note \"Payment address is required\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14094"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14095"}},{"Add":{"text":"indexedParam :: Text -> Parser Zip321Param -> Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14161"}},{"Add":{"text":"indexedParam name valuep = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14191"}},{"Add":{"text":" void $ string name","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14212"}},{"Add":{"text":" idx <- option 0 (char '.' *> decimal)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14252"}},{"Add":{"text":" (,) <$> pure idx <*> (char '=' *> valuep)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14296"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14297"}},{"Add":{"text":"parseAddrParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14335"}},{"Add":{"text":"parseAddrParam = indexedParam \"address\" (AddrParam . Address <$> takeWhile1 addrElem)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14421"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14422"}},{"Add":{"text":"parseAmountParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14462"}},{"Add":{"text":"parseAmountParam = indexedParam \"amount\" $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14508"}},{"Add":{"text":" s <- scientific","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14526"}},{"Add":{"text":" let zats = s * fromIntegral coin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14561"}},{"Add":{"text":" maybe","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14569"}},{"Add":{"text":" (fail \"Amount is out of bounds\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14606"}},{"Add":{"text":" (pure . AmountParam . Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14641"}},{"Add":{"text":" (toBoundedInteger zats)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14669"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14670"}},{"Add":{"text":"parseMemoParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14708"}},{"Add":{"text":"parseMemoParam = indexedParam \"memo\" $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14750"}},{"Add":{"text":" t <- takeText","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14766"}},{"Add":{"text":" either","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14775"}},{"Add":{"text":" (\\e -> fail . unpack $ \"Base64 decoding of memo value failed: \" <> e)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14849"}},{"Add":{"text":" (pure . MemoParam . Memo)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14879"}},{"Add":{"text":" (decodeBase64 $ encodeUtf8 t)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14913"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14914"}},{"Add":{"text":"parseLabelParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:14953"}},{"Add":{"text":"parseLabelParam = indexedParam \"label\" (LabelParam . decodeText <$> takeText)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15031"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15032"}},{"Add":{"text":"parseMessageParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15073"}},{"Add":{"text":"parseMessageParam = indexedParam \"message\" (MessageParam . decodeText <$> takeText)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15157"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15158"}},{"Add":{"text":"parseOtherParam :: Parser IndexedParam","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15197"}},{"Add":{"text":"parseOtherParam = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15218"}},{"Add":{"text":" pname <- takeWhile1 paramNameChar","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15254"}},{"Add":{"text":" idx <- option 0 (char '.' *> decimal)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15294"}},{"Add":{"text":" void (char '=')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15312"}},{"Add":{"text":" value <- decodeText <$> takeText","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15347"}},{"Add":{"text":" pure (idx, OtherParam pname value)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15384"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15392"}},{"Add":{"text":" paramNameChar c = isDigit c || (isAscii c && isAlpha c) || c == '+' || c == '-'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15476"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15477"}},{"Add":{"text":"parseURI :: Text -> Either String PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15526"}},{"Add":{"text":"parseURI = parseOnly zip321Parser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15560"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":4,"ins":{"up_context":[{"change":5,"pos":494}],"down_context":[{"change":4,"pos":11218}],"flag":"BLOCK","start":15597,"end":15661,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":494},"to":{"change":4,"start":11190,"end":11218},"introduced_by":4}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" ( Z.Address (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15616"}},{"Add":{"text":" Z._Address,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15632"}},{"Add":{"text":" Z.IVK (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15648"}},{"Add":{"text":" Z._IVK,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15660"}}],"del_contents":[{"Del":{"text":" ( ZAddr (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11205"}},{"Del":{"text":" _ZAddr,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11217"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":11,"ins":{"up_context":[{"change":4,"pos":11290}],"down_context":[{"change":4,"pos":11323}],"flag":"BLOCK","start":15662,"end":15720,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":11290},"to":{"change":4,"start":11290,"end":11323},"introduced_by":4}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" Z.Zatoshi (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15681"}},{"Add":{"text":" Z._Zatoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15697"}},{"Add":{"text":" Z.ToZatoshi (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15719"}}],"del_contents":[{"Del":{"text":" Zatoshi,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11302"}},{"Del":{"text":" ToZatoshi (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11322"}}]}},{"Edit":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":16,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":11367}],"down_context":[{"change":4,"pos":11367}],"flag":"BLOCK","start":15721,"end":15752,"inode":{"change":5,"pos":428}}},"contents":[{"Add":{"text":" getUserDiversifiedAddress,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15751"}}]}},{"Edit":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":20,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":591}],"down_context":[{"change":4,"pos":11378}],"flag":"BLOCK","start":15753,"end":15820,"inode":{"change":5,"pos":428}}},"contents":[{"Add":{"text":"import Aftok.Currency.Zcash.Types as Z","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15791"}},{"Add":{"text":"import Aftok.Types (UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15819"}}]}},{"Edit":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":23,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":11411},"to":{"change":4,"start":11411,"end":11444},"introduced_by":4}],"inode":{"change":5,"pos":428}}},"contents":[{"Del":{"text":"import Control.Lens (makePrisms)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11443"}}]}},{"Edit":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":44,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":781},"to":{"change":5,"start":781,"end":860},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":860},"to":{"change":5,"start":1491,"end":1492},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1491},"to":{"change":5,"start":1491,"end":1492},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1492},"to":{"change":4,"start":11928,"end":11970},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11970},"to":{"change":5,"start":1536,"end":1563},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1536},"to":{"change":5,"start":1536,"end":1563},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1563},"to":{"change":4,"start":11971,"end":11972},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11972},"to":{"change":5,"start":1563,"end":1582},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1563},"to":{"change":5,"start":1563,"end":1582},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1582},"to":{"change":5,"start":861,"end":922},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":922},"to":{"change":4,"start":11973,"end":11974},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":11974},"to":{"change":5,"start":922,"end":1002},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":922},"to":{"change":5,"start":922,"end":1002},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1002},"to":{"change":5,"start":1582,"end":1583},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1582},"to":{"change":5,"start":1582,"end":1583},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1583},"to":{"change":5,"start":1003,"end":1113},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1113},"to":{"change":5,"start":1583,"end":1622},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1583},"to":{"change":5,"start":1583,"end":1622},"introduced_by":5}],"inode":{"change":5,"pos":428}}},"contents":[{"Del":{"text":"coin :: Word64","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:795"}},{"Del":{"text":"coin = 100000000","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:812"}},{"Del":{"text":"","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:813"}},{"Del":{"text":"maxMoney :: Word64","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:832"}},{"Del":{"text":"maxMoney = 21000000 * coin","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:859"}},{"Del":{"text":"","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1491"}},{"Del":{"text":"newtype ZAddr = ZAddr {zaddrText :: Text}","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11969"}},{"Del":{"text":" deriving (Eq, Ord, Show)","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1562"}},{"Del":{"text":"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11971"}},{"Del":{"text":"makePrisms ''ZAddr","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1581"}},{"Del":{"text":"","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:861"}},{"Del":{"text":"newtype Zatoshi = Zatoshi Word64","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:894"}},{"Del":{"text":" deriving (Eq, Ord, Show)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:921"}},{"Del":{"text":"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:11973"}},{"Del":{"text":"makePrisms ''Zatoshi","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:942"}},{"Del":{"text":"","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:943"}},{"Del":{"text":"class ToZatoshi a where","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:967"}},{"Del":{"text":" toZatoshi :: a -> Maybe Zatoshi","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:1001"}},{"Del":{"text":"","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1582"}},{"Del":{"text":"instance ToZatoshi Word64 where","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:1034"}},{"Del":{"text":" toZatoshi amt =","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:1052"}},{"Del":{"text":" if amt > maxMoney then Nothing else Just (Zatoshi amt)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:1111"}},{"Del":{"text":"","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:1112"}},{"Del":{"text":"data ZAddrType","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1597"}},{"Del":{"text":" = Sprout","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1608"}},{"Del":{"text":" | Sapling","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1620"}},{"Del":{"text":"","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:1621"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":100,"ins":{"up_context":[{"change":4,"pos":12783}],"down_context":[{"change":4,"pos":12822}],"flag":"BLOCK","start":15821,"end":15862,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":12783},"to":{"change":4,"start":12783,"end":12822},"introduced_by":4}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" vzrAddrType :: Maybe Z.ZAddrType","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15861"}}],"del_contents":[{"Del":{"text":" vzrAddrType :: Maybe ZAddrType","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:12821"}}]}},{"Edit":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":114,"atom":{"EdgeMap":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":13035},"to":{"change":5,"start":2053,"end":2054},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2053},"to":{"change":5,"start":2053,"end":2054},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2054},"to":{"change":5,"start":2661,"end":2726},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2726},"to":{"change":5,"start":2342,"end":2411},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2342},"to":{"change":5,"start":2342,"end":2411},"introduced_by":5}],"inode":{"change":5,"pos":428}}},"contents":[{"Del":{"text":"","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:2053"}},{"Del":{"text":"decodeAddrType :: Text -> Maybe ZAddrType","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:2702"}},{"Del":{"text":"decodeAddrType = \\case","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:2725"}},{"Del":{"text":" \"sprout\" -> Just Sprout","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:2367"}},{"Del":{"text":" \"sapling\" -> Just Sapling","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:2395"}},{"Del":{"text":" _ -> Nothing","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:2410"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":115,"ins":{"up_context":[{"change":5,"pos":2412}],"down_context":[{"change":5,"pos":2781}],"flag":"BLOCK","start":15863,"end":15919,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2412},"to":{"change":5,"start":2727,"end":2781},"introduced_by":5}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":"parseAddrType :: A.Object -> Parser (Maybe Z.ZAddrType)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15918"}}],"del_contents":[{"Del":{"text":"parseAddrType :: A.Object -> Parser (Maybe ZAddrType)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:2780"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":118,"ins":{"up_context":[{"change":5,"pos":2832}],"down_context":[{"change":5,"pos":2875}],"flag":"BLOCK","start":15920,"end":15965,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2832},"to":{"change":5,"start":2832,"end":2875},"introduced_by":5}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" let typeMay = Z.decodeAddrType <$> typeStr","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:15964"}}],"del_contents":[{"Del":{"text":" let typeMay = decodeAddrType <$> typeStr","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:2874"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":131,"ins":{"up_context":[{"change":5,"pos":2834}],"down_context":[{"change":5,"pos":3327}],"flag":"BLOCK","start":15966,"end":16074,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2834},"to":{"change":5,"start":3223,"end":3327},"introduced_by":5}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":"rpcValidateZAddr :: Manager -> ZcashdConfig -> Text -> IO (Either (RPCError ZValidateAddressErr) Z.Address)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16073"}}],"del_contents":[{"Del":{"text":"rpcValidateZAddr :: Manager -> ZcashdConfig -> Text -> IO (Either (RPCError ZValidateAddressErr) ZAddr)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:3326"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":138,"ins":{"up_context":[{"change":4,"pos":13213}],"down_context":[{"change":4,"pos":13267}],"flag":"BLOCK","start":16075,"end":16179,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":13213},"to":{"change":4,"start":13213,"end":13266},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":13266},"to":{"change":5,"start":3601,"end":3644},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3601},"to":{"change":5,"start":3601,"end":3644},"introduced_by":5}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" Just Z.Sprout -> Left (RPCError SproutAddress)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16129"}},{"Add":{"text":" Just Z.Sapling -> Right (Z.Address addr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16178"}}],"del_contents":[{"Del":{"text":" Just Sprout -> Left (RPCError SproutAddress)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13265"}},{"Del":{"text":" Just Sapling -> Right (ZAddr addr)","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:3643"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":146,"ins":{"up_context":[{"change":4,"pos":13361}],"down_context":[{"change":4,"pos":13424}],"flag":"BLOCK","start":16180,"end":16249,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":13361},"to":{"change":4,"start":13361,"end":13424},"introduced_by":4}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" { addressType :: Z.ZAddrType","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16214"}},{"Add":{"text":" -- , address :: Z.Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16248"}}],"del_contents":[{"Del":{"text":" { addressType :: ZAddrType","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13393"}},{"Del":{"text":" -- , address :: ZAddr","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13423"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":155,"ins":{"up_context":[{"change":5,"pos":4045}],"down_context":[{"change":5,"pos":4085}],"flag":"BLOCK","start":16250,"end":16290,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4045},"to":{"change":4,"start":13433,"end":13469},"introduced_by":4}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" -- <*> (Z.Address <$> v .: \"address\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16289"}}],"del_contents":[{"Del":{"text":" -- <*> (ZAddr <$> v .: \"address\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13468"}}]}},{"Replacement":{"inode":{"change":5,"pos":428},"path":"lib/Aftok/Currency/Zcash.hs","line":178,"ins":{"up_context":[{"change":5,"pos":4828}],"down_context":[],"flag":"BLOCK","start":16291,"end":16480,"inode":{"change":5,"pos":428}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4828},"to":{"change":5,"start":4828,"end":4901},"introduced_by":5}],"inode":{"change":5,"pos":428}},"ins_contents":[{"Add":{"text":" Z.Sprout -> Left . RPCError $ SproutViewingKey","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16341"}},{"Add":{"text":" Z.Sapling -> Right ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16367"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16368"}},{"Add":{"text":"getUserDiversifiedAddress :: UserId -> IVK -> Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16422"}},{"Add":{"text":"getUserDiversifiedAddress = error \"Not Yet Implemented.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16479"}}],"del_contents":[{"Del":{"text":" Sprout -> Left . RPCError $ SproutViewingKey","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:4876"}},{"Del":{"text":" Sapling -> Right ()","pos":"SQ7UMLN5WCPHIF66RO4UQVX6RSNRRZBOVZP7HEMSKP7VO6YNQPRAC:4900"}}]}},{"Edit":{"inode":{"change":5,"pos":5808},"path":"lib/Aftok/Currency.hs","line":1,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":5808}],"down_context":[{"change":5,"pos":5809}],"flag":"BLOCK","start":16482,"end":16550,"inode":{"change":5,"pos":5808}}},"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16514"}},{"Add":{"text":"{-# LANGUAGE TypeApplications #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16548"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16549"}}]}},{"Edit":{"inode":{"change":5,"pos":5808},"path":"lib/Aftok/Currency.hs","line":5,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":5837}],"down_context":[{"change":5,"pos":5837}],"flag":"BLOCK","start":16551,"end":16710,"inode":{"change":5,"pos":5808}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16551"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16598"}},{"Add":{"text":"import qualified Bippy.Types as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16638"}},{"Add":{"text":"import Control.Lens (view)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16665"}},{"Add":{"text":"import qualified Haskoin.Address as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16709"}}]}},{"Replacement":{"inode":{"change":5,"pos":5808},"path":"lib/Aftok/Currency.hs","line":11,"ins":{"up_context":[{"change":5,"pos":5838}],"down_context":[{"change":5,"pos":5917}],"flag":"BLOCK","start":16711,"end":16886,"inode":{"change":5,"pos":5808}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5838},"to":{"change":4,"start":13722,"end":13781},"introduced_by":4}],"inode":{"change":5,"pos":5808}},"ins_contents":[{"Add":{"text":"data Currency a c where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16734"}},{"Add":{"text":" BTC :: Currency Bitcoin.Address Bitcoin.Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16784"}},{"Add":{"text":" ZEC :: Currency Zcash.Address Zcash.Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16830"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16831"}},{"Add":{"text":"data Currency' c = forall a. Currency' (Currency a c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16885"}}],"del_contents":[{"Del":{"text":"import Data.Aeson (Value)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13747"}},{"Del":{"text":"import Data.Aeson.Types (Parser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13780"}}]}},{"Replacement":{"inode":{"change":5,"pos":5808},"path":"lib/Aftok/Currency.hs","line":17,"ins":{"up_context":[{"change":5,"pos":5918}],"down_context":[{"change":4,"pos":13882}],"flag":"BLOCK","start":16887,"end":16983,"inode":{"change":5,"pos":5808}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5918},"to":{"change":4,"start":13782,"end":13882},"introduced_by":4}],"inode":{"change":5,"pos":5808}},"ins_contents":[{"Add":{"text":"data Amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16898"}},{"Add":{"text":" = forall a c.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16914"}},{"Add":{"text":" Amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16925"}},{"Add":{"text":" { currency :: !(Currency a c),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16962"}},{"Add":{"text":" value :: !c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16982"}}],"del_contents":[{"Del":{"text":"data Network a","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13796"}},{"Del":{"text":" = Network","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13808"}},{"Del":{"text":" { addressFromJSON :: Parser a,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13845"}},{"Del":{"text":" addressToJSON :: a -> Value","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:13881"}}]}},{"Edit":{"inode":{"change":5,"pos":5808},"path":"lib/Aftok/Currency.hs","line":23,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":13890}],"down_context":[],"flag":"BLOCK","start":16984,"end":17308,"inode":{"change":5,"pos":5808}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:16984"}},{"Add":{"text":"scaleCurrency :: Currency a c -> c -> Rational -> Maybe c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17042"}},{"Add":{"text":"scaleCurrency c amount factor = case c of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17084"}},{"Add":{"text":" BTC -> (\\(Bitcoin.Satoshi amt) -> Just $ Bitcoin.Satoshi ((round $ toRational amt * factor) :: Word64)) amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17197"}},{"Add":{"text":" ZEC -> (\\amt -> Zcash.toZatoshi ((round $ toRational (view Zcash._Zatoshi amt) * factor) :: Word64)) amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17307"}}]}},{"FileAdd":{"meta":{"basename":"Auctions.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE GADTs #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17333"}},{"Add":{"text":"{-# LANGUAGE GeneralizedNewtypeDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17377"}},{"Add":{"text":"{-# LANGUAGE LambdaCase #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17405"}},{"Add":{"text":"{-# LANGUAGE QuasiQuotes #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17434"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17435"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Auctions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17477"}},{"Add":{"text":" ( createAuction,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17496"}},{"Add":{"text":" findAuction,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17513"}},{"Add":{"text":" createBid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17528"}},{"Add":{"text":" findBids,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17542"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17546"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17552"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17553"}},{"Add":{"text":"import Aftok.Auction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17574"}},{"Add":{"text":" ( Auction (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17592"}},{"Add":{"text":" AuctionId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17612"}},{"Add":{"text":" Bid (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17626"}},{"Add":{"text":" BidId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17642"}},{"Add":{"text":" _AuctionId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17658"}},{"Add":{"text":" auctionEnd,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17674"}},{"Add":{"text":" bidAmount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17689"}},{"Add":{"text":" bidSeconds,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17705"}},{"Add":{"text":" bidTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17718"}},{"Add":{"text":" bidUser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17731"}},{"Add":{"text":" initiator,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17746"}},{"Add":{"text":" projectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17761"}},{"Add":{"text":" raiseAmount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17778"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17782"}},{"Add":{"text":"-- import Aftok.Currency ( Amount(..) )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17848"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17849"}},{"Add":{"text":"-- import qualified Aftok.Currency.Bitcoin as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17910"}},{"Add":{"text":"import Aftok.Currency.Bitcoin (_Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:17951"}},{"Add":{"text":"-- import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18010"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18011"}},{"Add":{"text":"import Aftok.Database ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18036"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18075"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18084"}},{"Add":{"text":" btcAmountParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18105"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18119"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18132"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18144"}},{"Add":{"text":" utcParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18159"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18163"}},{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18182"}},{"Add":{"text":" ( ProjectId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18202"}},{"Add":{"text":" UserId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18219"}},{"Add":{"text":" _ProjectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18235"}},{"Add":{"text":" _UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18248"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18252"}},{"Add":{"text":"import Control.Lens","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18272"}},{"Add":{"text":"import Data.Hourglass (Seconds (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18309"}},{"Add":{"text":"import qualified Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18347"}},{"Add":{"text":"import Database.PostgreSQL.Simple (Only (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18393"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromField ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18440"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow (RowParser, field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18501"}},{"Add":{"text":"import Database.PostgreSQL.Simple.SqlQQ (sql)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18547"}},{"Add":{"text":"import Safe (headMay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18569"}},{"Add":{"text":"import Prelude hiding (null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18598"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18599"}},{"Add":{"text":"auctionParser :: RowParser Auction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18634"}},{"Add":{"text":"auctionParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18650"}},{"Add":{"text":" Auction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18660"}},{"Add":{"text":" <$> idParser ProjectId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18687"}},{"Add":{"text":" <*> idParser UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18711"}},{"Add":{"text":" <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18729"}},{"Add":{"text":" <*> btcAmountParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18753"}},{"Add":{"text":" <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18771"}},{"Add":{"text":" <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18789"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18790"}},{"Add":{"text":"bidParser :: RowParser Bid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18817"}},{"Add":{"text":"bidParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18829"}},{"Add":{"text":" Bid <$> idParser UserId <*> (Seconds <$> field) <*> btcAmountParser <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18913"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18914"}},{"Add":{"text":"createAuction :: Auction -> DBM AuctionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18956"}},{"Add":{"text":"createAuction auc =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18976"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:18986"}},{"Add":{"text":" AuctionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19000"}},{"Add":{"text":" [sql| INSERT INTO auctions (project_id, initiator_id, raise_amount, end_time)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19082"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19128"}},{"Add":{"text":" ( auc ^. (projectId . _ProjectId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19167"}},{"Add":{"text":" auc ^. (initiator . _UserId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19203"}},{"Add":{"text":" auc ^. (raiseAmount . _Satoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19242"}},{"Add":{"text":" auc ^. (auctionEnd . to C.fromThyme)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19285"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19291"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19292"}},{"Add":{"text":"findAuction :: AuctionId -> DBM (Maybe Auction)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19340"}},{"Add":{"text":"findAuction aucId =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19360"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19370"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19385"}},{"Add":{"text":" auctionParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19405"}},{"Add":{"text":" [sql| SELECT project_id, initiator_id, created_at, raise_amount, start_time, end_time","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19497"}},{"Add":{"text":" FROM auctions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19521"}},{"Add":{"text":" WHERE id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19547"}},{"Add":{"text":" (Only (aucId ^. _AuctionId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19582"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19583"}},{"Add":{"text":"createBid :: AuctionId -> Bid -> DBM BidId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19626"}},{"Add":{"text":"createBid (AuctionId aucId) bid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19660"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19670"}},{"Add":{"text":" BidId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19680"}},{"Add":{"text":" [sql| INSERT INTO bids (auction_id, bidder_id, bid_seconds, bid_amount, bid_time)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19766"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19815"}},{"Add":{"text":" ( aucId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19828"}},{"Add":{"text":" bid ^. (bidUser . _UserId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19862"}},{"Add":{"text":" case bid ^. bidSeconds of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19894"}},{"Add":{"text":" (Seconds i) -> i,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19920"}},{"Add":{"text":" bid ^. (bidAmount . _Satoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19957"}},{"Add":{"text":" bid ^. (bidTime . to C.fromThyme)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:19997"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20003"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20004"}},{"Add":{"text":"findBids :: AuctionId -> DBM [(BidId, Bid)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20048"}},{"Add":{"text":"findBids aucId =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20065"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20074"}},{"Add":{"text":" ((,) <$> idParser BidId <*> bidParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20117"}},{"Add":{"text":" [sql| SELECT id, bidder_id, bid_seconds, bid_amount, bid_time FROM bids WHERE auction_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20217"}},{"Add":{"text":" (Only (aucId ^. _AuctionId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20250"}}]}},{"FileAdd":{"meta":{"basename":"Billing.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE QuasiQuotes #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20320"}},{"Add":{"text":"{-# LANGUAGE TypeApplications #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20354"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20355"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Billing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20396"}},{"Add":{"text":" ( createBillable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20416"}},{"Add":{"text":" findBillable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20434"}},{"Add":{"text":" findBillables,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20453"}},{"Add":{"text":" createSubscription,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20477"}},{"Add":{"text":" findSubscription,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20499"}},{"Add":{"text":" findSubscriptions,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20522"}},{"Add":{"text":" findSubscribers,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20543"}},{"Add":{"text":" storePaymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20568"}},{"Add":{"text":" findPaymentRequestByKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20597"}},{"Add":{"text":" findPaymentRequestById,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20625"}},{"Add":{"text":" findSubscriptionPaymentRequests,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20662"}},{"Add":{"text":" findSubscriptionUnpaidRequests,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20698"}},{"Add":{"text":" createPayment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20717"}},{"Add":{"text":" findPayments,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20735"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20739"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20745"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20746"}},{"Add":{"text":"import Aftok.Billing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20767"}},{"Add":{"text":" ( Billable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20781"}},{"Add":{"text":" Billable' (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20801"}},{"Add":{"text":" BillableId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20822"}},{"Add":{"text":" ContactChannel (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20847"}},{"Add":{"text":" Recurrence (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20868"}},{"Add":{"text":" Subscription,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20886"}},{"Add":{"text":" Subscription' (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20910"}},{"Add":{"text":" SubscriptionId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20935"}},{"Add":{"text":" _BillableId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20952"}},{"Add":{"text":" _SubscriptionId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20973"}},{"Add":{"text":" amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:20985"}},{"Add":{"text":" description,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21002"}},{"Add":{"text":" gracePeriod,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21019"}},{"Add":{"text":" name,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21029"}},{"Add":{"text":" paymentRequestEmailTemplate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21062"}},{"Add":{"text":" paymentRequestMemoTemplate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21094"}},{"Add":{"text":" project,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21107"}},{"Add":{"text":" recurrence,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21123"}},{"Add":{"text":" recurrenceCount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21144"}},{"Add":{"text":" recurrenceName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21164"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21168"}},{"Add":{"text":"import Aftok.Currency (Amount (..), Currency (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21219"}},{"Add":{"text":"import Aftok.Currency.Bitcoin (Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21259"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21310"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin.Payments as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21370"}},{"Add":{"text":"import Aftok.Currency.Zcash (Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21408"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Json","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21446"}},{"Add":{"text":" ( nativeRequestJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21469"}},{"Add":{"text":" parseBip70PaymentRequestJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21503"}},{"Add":{"text":" parseBitcoinPaymentJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21532"}},{"Add":{"text":" parseZcashPaymentJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21559"}},{"Add":{"text":" parseZip321PaymentRequestJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21594"}},{"Add":{"text":" paymentJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21611"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21615"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21654"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21663"}},{"Add":{"text":" currencyAmountParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21689"}},{"Add":{"text":" currencyType,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21707"}},{"Add":{"text":" currencyValue,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21726"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21740"}},{"Add":{"text":" nominalDiffTimeParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21767"}},{"Add":{"text":" nullField,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21782"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21795"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21807"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21811"}},{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21839"}},{"Add":{"text":" ( NativePayment (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21863"}},{"Add":{"text":" NativeRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21887"}},{"Add":{"text":" Payment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21900"}},{"Add":{"text":" Payment' (Payment),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21924"}},{"Add":{"text":" PaymentId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21944"}},{"Add":{"text":" PaymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21964"}},{"Add":{"text":" PaymentRequest' (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:21990"}},{"Add":{"text":" PaymentRequestId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22017"}},{"Add":{"text":" PaymentRequestId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22039"}},{"Add":{"text":" SomePaymentRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22068"}},{"Add":{"text":" SomePaymentRequestDetail,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22098"}},{"Add":{"text":" _PaymentRequestId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22121"}},{"Add":{"text":" billingDate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22138"}},{"Add":{"text":" bip70Request,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22156"}},{"Add":{"text":" createdAt,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22171"}},{"Add":{"text":" nativeRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22190"}},{"Add":{"text":" paymentDate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22207"}},{"Add":{"text":" paymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22227"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22231"}},{"Add":{"text":"import Aftok.TimeLog","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22252"}},{"Add":{"text":" ( EventId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22270"}},{"Add":{"text":" _EventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22284"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22288"}},{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22307"}},{"Add":{"text":" ( Email (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22323"}},{"Add":{"text":" ProjectId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22343"}},{"Add":{"text":" UserId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22360"}},{"Add":{"text":" _ProjectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22376"}},{"Add":{"text":" _UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22389"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22393"}},{"Add":{"text":"import Control.Lens ((.~), (^.), (^?), _Just, to, view)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22449"}},{"Add":{"text":"import Data.Aeson (encode)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22476"}},{"Add":{"text":"import Data.Aeson.Types (parseEither)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22514"}},{"Add":{"text":"import qualified Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22553"}},{"Add":{"text":"import qualified Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22591"}},{"Add":{"text":"import Database.PostgreSQL.Simple (Only (..), ResultError (Incompatible))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22665"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromField (FieldParser, returnError, typename)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22746"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow (RowParser, field, fieldWith)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22818"}},{"Add":{"text":"import Database.PostgreSQL.Simple.SqlQQ (sql)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22864"}},{"Add":{"text":"import Safe (headMay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22886"}},{"Add":{"text":"import Prelude hiding (null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22915"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22916"}},{"Add":{"text":"billableParser :: RowParser (Billable Amount)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22962"}},{"Add":{"text":"billableParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22979"}},{"Add":{"text":" Billable","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:22990"}},{"Add":{"text":" <$> idParser ProjectId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23017"}},{"Add":{"text":" <*> idParser UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23041"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23055"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23069"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23083"}},{"Add":{"text":" <*> recurrenceParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23108"}},{"Add":{"text":" <*> currencyAmountParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23137"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23151"}},{"Add":{"text":" <*> fieldWith nominalDiffTimeParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23191"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23205"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23219"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23220"}},{"Add":{"text":"recurrenceParser :: RowParser Recurrence","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23261"}},{"Add":{"text":"recurrenceParser = join $ fieldWith recurrenceParser'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23315"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23316"}},{"Add":{"text":"recurrenceParser' :: FieldParser (RowParser Recurrence)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23372"}},{"Add":{"text":"recurrenceParser' f v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23399"}},{"Add":{"text":" tn <- typename f","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23418"}},{"Add":{"text":" if tn /= \"recurrence_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23444"}},{"Add":{"text":" then returnError Incompatible f \"column was not of type recurrence_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23518"}},{"Add":{"text":" else maybe empty (pure . parser . decodeUtf8) v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23570"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23578"}},{"Add":{"text":" parser :: Text -> RowParser Recurrence","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23621"}},{"Add":{"text":" parser = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23640"}},{"Add":{"text":" \"annually\" -> nullField *> pure Annually","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23687"}},{"Add":{"text":" \"monthly\" -> Monthly <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23724"}},{"Add":{"text":" --\"semimonthly\" = nullField *> pure SemiMonthly","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23778"}},{"Add":{"text":" \"weekly\" -> Weekly <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23813"}},{"Add":{"text":" \"onetime\" -> nullField *> pure OneTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23858"}},{"Add":{"text":" _ -> empty","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23875"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23876"}},{"Add":{"text":"subscriptionParser :: RowParser Subscription","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23921"}},{"Add":{"text":"subscriptionParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23942"}},{"Add":{"text":" Subscription","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23957"}},{"Add":{"text":" <$> idParser UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:23981"}},{"Add":{"text":" <*> idParser BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24009"}},{"Add":{"text":" <*> (EmailChannel . Email <$> field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24050"}},{"Add":{"text":" <*> (C.toThyme <$> field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24080"}},{"Add":{"text":" <*> ((fmap C.toThyme) <$> field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24117"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24118"}},{"Add":{"text":"bip70RequestParser :: RowParser (NativeRequest Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24174"}},{"Add":{"text":"bip70RequestParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24195"}},{"Add":{"text":" Bip70Request <$> ((either (const empty) pure . parseEither parseBip70PaymentRequestJSON) =<< field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24297"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24298"}},{"Add":{"text":"zip321RequestParser :: RowParser (NativeRequest Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24355"}},{"Add":{"text":"zip321RequestParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24377"}},{"Add":{"text":" Zip321Request <$> ((either (const empty) pure . parseEither parseZip321PaymentRequestJSON) =<< field)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24481"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24482"}},{"Add":{"text":"paymentRequestDetailParser :: RowParser SomePaymentRequestDetail","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24547"}},{"Add":{"text":"paymentRequestDetailParser = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24579"}},{"Add":{"text":" billable <- billableParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24608"}},{"Add":{"text":" ctime :: C.UTCTime <- C.toThyme <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24652"}},{"Add":{"text":" billDay :: C.Day <- C.toThyme <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24694"}},{"Add":{"text":" case billable ^. amount of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24723"}},{"Add":{"text":" (Amount BTC sats) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24751"}},{"Add":{"text":" nativeReq <- bip70RequestParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24789"}},{"Add":{"text":" pure . SomePaymentRequest $ PaymentRequest (billable & amount .~ sats) ctime billDay nativeReq","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24890"}},{"Add":{"text":" (Amount ZEC zats) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24918"}},{"Add":{"text":" nativeReq <- zip321RequestParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:24957"}},{"Add":{"text":" pure . SomePaymentRequest $ PaymentRequest (billable & amount .~ zats) ctime billDay nativeReq","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25058"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25059"}},{"Add":{"text":"paymentParser :: Bitcoin.NetworkMode -> PaymentRequestId -> Currency a c -> RowParser (Payment c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25157"}},{"Add":{"text":"paymentParser nmode prid ccy = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25191"}},{"Add":{"text":" d :: C.UTCTime <- C.toThyme <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25231"}},{"Add":{"text":" case ccy of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25245"}},{"Add":{"text":" BTC -> Payment (Const prid) d <$> bitcoinPaymentParser nmode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25310"}},{"Add":{"text":" ZEC -> Payment (Const prid) d <$> zcashPaymentParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25367"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25368"}},{"Add":{"text":"bitcoinPaymentParser :: Bitcoin.NetworkMode -> RowParser (NativePayment Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25449"}},{"Add":{"text":"bitcoinPaymentParser nmode = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25481"}},{"Add":{"text":" pvalue <- field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25499"}},{"Add":{"text":" either","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25508"}},{"Add":{"text":" (const empty)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25526"}},{"Add":{"text":" (pure . BitcoinPayment)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25554"}},{"Add":{"text":" (parseEither (parseBitcoinPaymentJSON nmode) pvalue)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25611"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25612"}},{"Add":{"text":"zcashPaymentParser :: RowParser (NativePayment Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25668"}},{"Add":{"text":"zcashPaymentParser = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25692"}},{"Add":{"text":" pvalue <- field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25710"}},{"Add":{"text":" either","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25719"}},{"Add":{"text":" (const empty)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25737"}},{"Add":{"text":" (pure . ZcashPayment)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25763"}},{"Add":{"text":" (parseEither parseZcashPaymentJSON pvalue)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25810"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25811"}},{"Add":{"text":"createBillable :: EventId -> UserId -> Billable Amount -> DBM BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25884"}},{"Add":{"text":"createBillable eventId _ b = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25916"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25926"}},{"Add":{"text":" BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25941"}},{"Add":{"text":" [sql| INSERT INTO billables","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:25973"}},{"Add":{"text":" ( project_id, event_id, name, description","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26025"}},{"Add":{"text":" , recurrence_type, recurrence_count","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26071"}},{"Add":{"text":" , billing_currency, billing_amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26116"}},{"Add":{"text":" , grace_period_days","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26146"}},{"Add":{"text":" , payment_request_email_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26189"}},{"Add":{"text":" , payment_request_memo_template)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26232"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26299"}},{"Add":{"text":" ( b ^. (project . _ProjectId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26334"}},{"Add":{"text":" eventId ^. _EventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26361"}},{"Add":{"text":" b ^. name,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26378"}},{"Add":{"text":" b ^. description,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26402"}},{"Add":{"text":" b ^. (recurrence . to recurrenceName),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26447"}},{"Add":{"text":" b ^. (recurrence . to recurrenceCount),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26493"}},{"Add":{"text":" b ^. (amount . to currencyType),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26532"}},{"Add":{"text":" b ^. (amount . to currencyValue),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26572"}},{"Add":{"text":" b ^. (gracePeriod),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26598"}},{"Add":{"text":" b ^. (paymentRequestEmailTemplate),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26640"}},{"Add":{"text":" b ^. (paymentRequestMemoTemplate)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26680"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26686"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26687"}},{"Add":{"text":"findBillable :: BillableId -> DBM (Maybe (Billable Amount))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26747"}},{"Add":{"text":"findBillable bid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26766"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26776"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26791"}},{"Add":{"text":" billableParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26812"}},{"Add":{"text":" [sql| SELECT b.project_id, e.created_by,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26859"}},{"Add":{"text":" b.name, b.description, b.message,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26910"}},{"Add":{"text":" b.recurrence_type, b.recurrence_count,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:26966"}},{"Add":{"text":" b.billing_currency, b.billing_amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27021"}},{"Add":{"text":" b.grace_period_days, b.request_expiry_seconds,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27085"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27168"}},{"Add":{"text":" FROM billables b JOIN aftok_events e ON e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27236"}},{"Add":{"text":" WHERE b.id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27264"}},{"Add":{"text":" (Only (bid ^. _BillableId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27298"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27299"}},{"Add":{"text":"findBillables :: ProjectId -> DBM [(BillableId, Billable Amount)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27365"}},{"Add":{"text":"findBillables pid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27385"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27394"}},{"Add":{"text":" ((,) <$> idParser BillableId <*> billableParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27447"}},{"Add":{"text":" [sql| SELECT b.id, b.project_id, e.created_by,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27498"}},{"Add":{"text":" b.name, b.description, b.message,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27549"}},{"Add":{"text":" b.recurrence_type, b.recurrence_count,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27605"}},{"Add":{"text":" b.billing_currency, b.billing_amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27660"}},{"Add":{"text":" b.grace_period_days, b.request_expiry_seconds,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27724"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27807"}},{"Add":{"text":" FROM billables b JOIN aftok_events e ON e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27875"}},{"Add":{"text":" WHERE b.project_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27911"}},{"Add":{"text":" (Only (pid ^. _ProjectId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27942"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:27943"}},{"Add":{"text":"createSubscription :: EventId -> UserId -> BillableId -> C.Day -> DBM SubscriptionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28028"}},{"Add":{"text":"createSubscription eventId uid bid start_date =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28076"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28086"}},{"Add":{"text":" SubscriptionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28105"}},{"Add":{"text":" [sql| INSERT INTO subscriptions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28141"}},{"Add":{"text":" (user_id, billable_id, event_id, start_date)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28196"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28242"}},{"Add":{"text":" ( view _UserId uid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28266"}},{"Add":{"text":" view _BillableId bid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28294"}},{"Add":{"text":" view _EventId eventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28323"}},{"Add":{"text":" C.fromThyme start_date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28352"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28358"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28359"}},{"Add":{"text":"findSubscription :: SubscriptionId -> DBM (Maybe Subscription)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28422"}},{"Add":{"text":"findSubscription sid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28445"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28455"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28470"}},{"Add":{"text":" subscriptionParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28495"}},{"Add":{"text":" [sql| SELECT id, billable_id, contact_email, start_date, end_date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28567"}},{"Add":{"text":" FROM subscriptions s","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28598"}},{"Add":{"text":" WHERE s.id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28626"}},{"Add":{"text":" (Only (sid ^. _SubscriptionId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28664"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28665"}},{"Add":{"text":"findSubscriptions :: ProjectId -> UserId -> DBM [(SubscriptionId, Subscription)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28746"}},{"Add":{"text":"findSubscriptions pid uid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28774"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28783"}},{"Add":{"text":" ((,) <$> idParser SubscriptionId <*> subscriptionParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28844"}},{"Add":{"text":" [sql| SELECT s.id, user_id, billable_id, contact_email, start_date, end_date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28925"}},{"Add":{"text":" FROM subscriptions s","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:28956"}},{"Add":{"text":" JOIN billables b ON b.id = s.billable_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29007"}},{"Add":{"text":" WHERE s.user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29037"}},{"Add":{"text":" AND b.project_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29071"}},{"Add":{"text":" (uid ^. _UserId, pid ^. _ProjectId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29111"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29112"}},{"Add":{"text":"findSubscribers :: ProjectId -> DBM [UserId]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29157"}},{"Add":{"text":"findSubscribers pid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29179"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29188"}},{"Add":{"text":" (idParser UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29210"}},{"Add":{"text":" [sql| SELECT s.user_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29237"}},{"Add":{"text":" FROM subscripions s","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29267"}},{"Add":{"text":" JOIN billables b ON s.billable_id = b.id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29318"}},{"Add":{"text":" WHERE b.project_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29354"}},{"Add":{"text":" (Only (pid ^. _ProjectId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29385"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29386"}},{"Add":{"text":"storePaymentRequest ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29409"}},{"Add":{"text":" EventId ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29422"}},{"Add":{"text":" Maybe SubscriptionId ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29448"}},{"Add":{"text":" PaymentRequest c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29470"}},{"Add":{"text":" DBM PaymentRequestId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29493"}},{"Add":{"text":"storePaymentRequest eid sid req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29527"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29537"}},{"Add":{"text":" PaymentRequestId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29558"}},{"Add":{"text":" [sql| INSERT INTO payment_requests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29597"}},{"Add":{"text":" (subscription_id, event_id, request_json, url_key, request_time, billing_date)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29686"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29738"}},{"Add":{"text":" ( (^. _SubscriptionId) <$> sid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29774"}},{"Add":{"text":" eid ^. _EventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29797"}},{"Add":{"text":" req ^. nativeRequest . to nativeRequestJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29848"}},{"Add":{"text":" req ^? nativeRequest . to bip70Request . _Just . Bitcoin.paymentRequestKey . Bitcoin._PaymentKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29952"}},{"Add":{"text":" req ^. createdAt . to C.fromThyme,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:29993"}},{"Add":{"text":" req ^. billingDate . to C.fromThyme","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30035"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30041"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30042"}},{"Add":{"text":"findPaymentRequestByKey :: Bitcoin.PaymentKey -> DBM (Maybe (PaymentRequestId, SomePaymentRequestDetail))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30148"}},{"Add":{"text":"findPaymentRequestByKey (Bitcoin.PaymentKey k) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30197"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30207"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30222"}},{"Add":{"text":" ((,) <$> idParser PaymentRequestId <*> paymentRequestDetailParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30295"}},{"Add":{"text":" [sql|","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30307"}},{"Add":{"text":" SELECT r.id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30328"}},{"Add":{"text":" b.project_id, e.created_by, b.name, b.description, b.recurrence_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30408"}},{"Add":{"text":" b.recurrence_count, b.billing_currency, b.billing_amount, b.grace_period_days,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30497"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30573"}},{"Add":{"text":" r.request_time, r.billing_date, r.request_json,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30631"}},{"Add":{"text":" FROM payment_requests r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30663"}},{"Add":{"text":" JOIN billables b on b.id = s.billable_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30712"}},{"Add":{"text":" JOIN aftok_events e on e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30761"}},{"Add":{"text":" WHERE r.url_key = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30789"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30798"}},{"Add":{"text":" (Only k)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30813"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30814"}},{"Add":{"text":"findPaymentRequestById :: PaymentRequestId -> DBM (Maybe SomePaymentRequestDetail)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30897"}},{"Add":{"text":"findPaymentRequestById (PaymentRequestId prid) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30946"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30956"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:30971"}},{"Add":{"text":" paymentRequestDetailParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31004"}},{"Add":{"text":" [sql|","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31016"}},{"Add":{"text":" SELECT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31031"}},{"Add":{"text":" b.project_id, e.created_by, b.name, b.description, b.recurrence_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31111"}},{"Add":{"text":" b.recurrence_count, b.billing_currency, b.billing_amount, b.grace_period_days,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31200"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31276"}},{"Add":{"text":" r.request_time, r.billing_date, r.request_json,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31334"}},{"Add":{"text":" FROM payment_requests r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31366"}},{"Add":{"text":" JOIN billables b on b.id = s.billable_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31415"}},{"Add":{"text":" JOIN aftok_events e on e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31464"}},{"Add":{"text":" WHERE r.id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31487"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31496"}},{"Add":{"text":" (Only prid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31514"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31515"}},{"Add":{"text":"findSubscriptionPaymentRequests :: SubscriptionId -> DBM [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31619"}},{"Add":{"text":"findSubscriptionPaymentRequests sid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31657"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31666"}},{"Add":{"text":" ((,) <$> idParser PaymentRequestId <*> paymentRequestDetailParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31737"}},{"Add":{"text":" [sql|","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31747"}},{"Add":{"text":" SELECT r.id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31766"}},{"Add":{"text":" b.project_id, e.created_by, b.name, b.description, b.recurrence_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31844"}},{"Add":{"text":" b.recurrence_count, b.billing_currency, b.billing_amount, b.grace_period_days,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:31931"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32005"}},{"Add":{"text":" r.request_time, r.billing_date, r.request_json,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32061"}},{"Add":{"text":" FROM payment_requests r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32091"}},{"Add":{"text":" JOIN billables b on b.id = s.billable_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32138"}},{"Add":{"text":" JOIN aftok_events e on e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32185"}},{"Add":{"text":" WHERE subscription_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32217"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32224"}},{"Add":{"text":" (Only (sid ^. _SubscriptionId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32260"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32261"}},{"Add":{"text":"findSubscriptionUnpaidRequests :: SubscriptionId -> DBM [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32364"}},{"Add":{"text":"findSubscriptionUnpaidRequests sid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32401"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32410"}},{"Add":{"text":" ((,) <$> idParser PaymentRequestId <*> paymentRequestDetailParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32481"}},{"Add":{"text":" [sql| SELECT r.id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32504"}},{"Add":{"text":" b.project_id, e.created_by, b.name, b.description, b.recurrence_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32587"}},{"Add":{"text":" b.recurrence_count, b.billing_currency, b.billing_amount, b.grace_period_days,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32679"}},{"Add":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32758"}},{"Add":{"text":" r.request_time, r.billing_date, r.request_json,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32819"}},{"Add":{"text":" FROM payment_requests r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32849"}},{"Add":{"text":" JOIN subscriptions s on s.id = r.subscription_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32904"}},{"Add":{"text":" JOIN billables b on b.id = s.billable_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32951"}},{"Add":{"text":" JOIN aftok_events e on e.id = b.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:32998"}},{"Add":{"text":" WHERE subscription_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33030"}},{"Add":{"text":" AND r.id NOT IN (SELECT payment_request_id FROM payments)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33094"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33101"}},{"Add":{"text":" (Only (sid ^. _SubscriptionId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33137"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33138"}},{"Add":{"text":"createPayment :: EventId -> Payment c -> DBM PaymentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33193"}},{"Add":{"text":"createPayment eventId p = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33222"}},{"Add":{"text":" nmode <- asks fst","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33242"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33252"}},{"Add":{"text":" PaymentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33266"}},{"Add":{"text":" [sql| INSERT INTO payments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33297"}},{"Add":{"text":" (payment_request_id, event_id, payment_data, payment_date)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33366"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33412"}},{"Add":{"text":" ( p ^. (paymentRequest . to getConst . _PaymentRequestId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33475"}},{"Add":{"text":" eventId ^. _EventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33502"}},{"Add":{"text":" p ^. (to (paymentJSON nmode) . to encode),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33551"}},{"Add":{"text":" p ^. (paymentDate . to C.fromThyme)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33593"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33599"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33600"}},{"Add":{"text":"findPayments :: Currency a c -> PaymentRequestId -> DBM [(PaymentId, Payment c)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33681"}},{"Add":{"text":"findPayments ccy rid = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33707"}},{"Add":{"text":" nmode <- asks fst","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33727"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33736"}},{"Add":{"text":" ((,) <$> idParser PaymentId <*> paymentParser nmode rid ccy)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33801"}},{"Add":{"text":" [sql| SELECT id, payment_request_id, payment_date, payment_data","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33869"}},{"Add":{"text":" FROM payments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33891"}},{"Add":{"text":" WHERE payment_request_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33931"}},{"Add":{"text":" (Only (rid ^. _PaymentRequestId))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:33969"}}]}},{"FileAdd":{"meta":{"basename":"Events.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE GADTs #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34030"}},{"Add":{"text":"{-# LANGUAGE GeneralizedNewtypeDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34074"}},{"Add":{"text":"{-# LANGUAGE LambdaCase #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34102"}},{"Add":{"text":"{-# LANGUAGE QuasiQuotes #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34131"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34132"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34172"}},{"Add":{"text":" ( storeEvent,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34188"}},{"Add":{"text":" storeEvent',","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34205"}},{"Add":{"text":" createEvent,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34222"}},{"Add":{"text":" findEvent,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34237"}},{"Add":{"text":" findEvents,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34253"}},{"Add":{"text":" amendEvent,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34269"}},{"Add":{"text":" readWorkIndex,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34288"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34292"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34298"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34299"}},{"Add":{"text":"import Aftok.Database","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34321"}},{"Add":{"text":" ( DBError (EventStorageFailed),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34355"}},{"Add":{"text":" DBOp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34364"}},{"Add":{"text":" ( CreateBillable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34388"}},{"Add":{"text":" CreatePayment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34411"}},{"Add":{"text":" CreateSubscription,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34439"}},{"Add":{"text":" StorePaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34467"}},{"Add":{"text":" ),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34476"}},{"Add":{"text":" KeyedLogEntry,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34495"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34499"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Json","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34537"}},{"Add":{"text":" ( nativeRequestJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34560"}},{"Add":{"text":" paymentJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34577"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34581"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34620"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34629"}},{"Add":{"text":" creditToName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34647"}},{"Add":{"text":" creditToParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34667"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34681"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34694"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34706"}},{"Add":{"text":" utcParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34721"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34725"}},{"Add":{"text":"import Aftok.Interval","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34747"}},{"Add":{"text":"import Aftok.Json","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34765"}},{"Add":{"text":" ( billableJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34783"}},{"Add":{"text":" createSubscriptionJSON,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34811"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34815"}},{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34843"}},{"Add":{"text":"import Aftok.TimeLog","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34864"}},{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34883"}},{"Add":{"text":"import Control.Lens ((^.), _Just, preview)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34926"}},{"Add":{"text":"import Control.Monad.Trans.Except (throwE)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34969"}},{"Add":{"text":"import Data.Aeson","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34987"}},{"Add":{"text":" ( Value,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:34998"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35002"}},{"Add":{"text":"import Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35031"}},{"Add":{"text":"import Data.Thyme.Time","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35054"}},{"Add":{"text":"import Database.PostgreSQL.Simple","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35088"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromField","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35132"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35174"}},{"Add":{"text":"import Database.PostgreSQL.Simple.SqlQQ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35214"}},{"Add":{"text":" ( sql,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35223"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35227"}},{"Add":{"text":"import Safe (headMay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35249"}},{"Add":{"text":"import Prelude hiding (null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35278"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35279"}},{"Add":{"text":"eventTypeParser :: FieldParser (C.UTCTime -> LogEvent)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35334"}},{"Add":{"text":"eventTypeParser f v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35359"}},{"Add":{"text":" tn <- typename f","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35378"}},{"Add":{"text":" if tn /= \"event_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35399"}},{"Add":{"text":" then returnError Incompatible f \"column was not of type event_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35468"}},{"Add":{"text":" else","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35477"}},{"Add":{"text":" maybe","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35489"}},{"Add":{"text":" (returnError UnexpectedNull f \"event type may not be null\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35557"}},{"Add":{"text":" ( maybe (returnError Incompatible f \"unrecognized event type value\") pure","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35639"}},{"Add":{"text":" . nameEvent","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35663"}},{"Add":{"text":" . decodeUtf8","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35688"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35698"}},{"Add":{"text":" v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35708"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35709"}},{"Add":{"text":"logEntryParser :: RowParser LogEntry","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35746"}},{"Add":{"text":"logEntryParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35763"}},{"Add":{"text":" LogEntry","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35774"}},{"Add":{"text":" <$> creditToParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35797"}},{"Add":{"text":" <*> (fieldWith eventTypeParser <*> utcParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35847"}},{"Add":{"text":" <*> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35861"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35862"}},{"Add":{"text":"keyedLogEntryParser :: RowParser KeyedLogEntry","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35909"}},{"Add":{"text":"keyedLogEntryParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:35931"}},{"Add":{"text":" (,,) <$> idParser ProjectId <*> idParser UserId <*> logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36000"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36001"}},{"Add":{"text":"storeEvent :: DBOp a -> Maybe (DBM EventId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36045"}},{"Add":{"text":"storeEvent = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36064"}},{"Add":{"text":" (CreateBillable uid b) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36092"}},{"Add":{"text":" Just $ storeEventJSON (Just uid) \"create_billable\" (billableJSON b)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36164"}},{"Add":{"text":" (CreateSubscription uid bid t) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36200"}},{"Add":{"text":" Just $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36211"}},{"Add":{"text":" storeEventJSON","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36232"}},{"Add":{"text":" (Just uid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36251"}},{"Add":{"text":" \"create_subscription\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36281"}},{"Add":{"text":" (createSubscriptionJSON uid bid t)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36324"}},{"Add":{"text":" (StorePaymentRequest req) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36355"}},{"Add":{"text":" Just $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36366"}},{"Add":{"text":" storeEventJSON Nothing \"create_payment_request\" (nativeRequestJSON (req ^. nativeRequest))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36463"}},{"Add":{"text":" (CreatePayment p) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36486"}},{"Add":{"text":" Just $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36500"}},{"Add":{"text":" nmode <- asks fst","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36524"}},{"Add":{"text":" storeEventJSON Nothing \"create_payment\" (paymentJSON nmode p)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36592"}},{"Add":{"text":" _ -> Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36607"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36608"}},{"Add":{"text":"storeEvent' :: DBOp a -> DBM EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36645"}},{"Add":{"text":"storeEvent' = maybe (lift $ throwE EventStorageFailed) id . storeEvent","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36716"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36717"}},{"Add":{"text":"type EventType = Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36739"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36740"}},{"Add":{"text":"storeEventJSON :: Maybe UserId -> EventType -> Value -> DBM EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36808"}},{"Add":{"text":"storeEventJSON uid etype v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36840"}},{"Add":{"text":" timestamp <- liftIO C.getCurrentTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36879"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36889"}},{"Add":{"text":" EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36901"}},{"Add":{"text":" [sql| INSERT INTO aftok_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36936"}},{"Add":{"text":" (event_time, created_by, event_type, event_json)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:36995"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37041"}},{"Add":{"text":" (fromThyme timestamp, preview (_Just . _UserId) uid, etype, v)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37108"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37109"}},{"Add":{"text":"createEvent :: ProjectId -> UserId -> LogEntry -> DBM EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37171"}},{"Add":{"text":"createEvent (ProjectId pid) (UserId uid) (LogEntry c e m) = case c of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37241"}},{"Add":{"text":" CreditToAccount aid' -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37270"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37282"}},{"Add":{"text":" EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37296"}},{"Add":{"text":" [sql| INSERT INTO work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37332"}},{"Add":{"text":" ( project_id, user_id, credit_to_type, credit_to_account,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37404"}},{"Add":{"text":" , event_type, event_time, event_metadata )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37461"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37504"}},{"Add":{"text":" RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37534"}},{"Add":{"text":" ( pid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37547"}},{"Add":{"text":" uid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37560"}},{"Add":{"text":" creditToName c,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37584"}},{"Add":{"text":" aid' ^. _AccountId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37612"}},{"Add":{"text":" eventName e,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37633"}},{"Add":{"text":" fromThyme $ e ^. eventTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37669"}},{"Add":{"text":" m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37679"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37687"}},{"Add":{"text":" CreditToProject pid' ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37713"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37725"}},{"Add":{"text":" EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37739"}},{"Add":{"text":" [sql| INSERT INTO work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37775"}},{"Add":{"text":" ( project_id, user_id, credit_to_type, credit_to_project_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37849"}},{"Add":{"text":" , event_type, event_time, event_metadata )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37906"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37949"}},{"Add":{"text":" RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37979"}},{"Add":{"text":" ( pid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:37992"}},{"Add":{"text":" uid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38005"}},{"Add":{"text":" creditToName c,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38029"}},{"Add":{"text":" pid' ^. _ProjectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38057"}},{"Add":{"text":" eventName e,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38078"}},{"Add":{"text":" fromThyme $ e ^. eventTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38114"}},{"Add":{"text":" m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38124"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38132"}},{"Add":{"text":" CreditToUser uid' ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38155"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38167"}},{"Add":{"text":" EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38181"}},{"Add":{"text":" [sql| INSERT INTO work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38217"}},{"Add":{"text":" ( project_id, user_id, credit_to_type, credit_to_user_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38288"}},{"Add":{"text":" , event_type, event_time, event_metadata)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38344"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38387"}},{"Add":{"text":" RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38417"}},{"Add":{"text":" ( pid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38430"}},{"Add":{"text":" uid,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38443"}},{"Add":{"text":" creditToName c,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38467"}},{"Add":{"text":" uid' ^. _UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38492"}},{"Add":{"text":" eventName e,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38513"}},{"Add":{"text":" fromThyme $ e ^. eventTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38549"}},{"Add":{"text":" m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38559"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38567"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38568"}},{"Add":{"text":"findEvent :: EventId -> DBM (Maybe KeyedLogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38618"}},{"Add":{"text":"findEvent (EventId eid) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38647"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38657"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38672"}},{"Add":{"text":" keyedLogEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38698"}},{"Add":{"text":" [sql| SELECT project_id, user_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38738"}},{"Add":{"text":" credit_to_type, credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38831"}},{"Add":{"text":" event_type, event_time, event_metadata FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38904"}},{"Add":{"text":" WHERE id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38930"}},{"Add":{"text":" (Only eid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38947"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:38948"}},{"Add":{"text":"findEvents :: ProjectId -> UserId -> RangeQuery -> Word32 -> DBM [LogEntry]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39024"}},{"Add":{"text":"findEvents (ProjectId pid) (UserId uid) rquery limit = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39082"}},{"Add":{"text":" case rquery of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39099"}},{"Add":{"text":" (Before e) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39117"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39130"}},{"Add":{"text":" logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39153"}},{"Add":{"text":" [sql| SELECT credit_to_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39190"}},{"Add":{"text":" credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39269"}},{"Add":{"text":" event_type, event_time,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39312"}},{"Add":{"text":" event_metadata","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39346"}},{"Add":{"text":" FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39375"}},{"Add":{"text":" WHERE project_id = ? AND user_id = ? AND event_time <= ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39444"}},{"Add":{"text":" ORDER BY event_time DESC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39481"}},{"Add":{"text":" LIMIT ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39501"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39516"}},{"Add":{"text":" (pid, uid, fromThyme e, limit)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39555"}},{"Add":{"text":" (During s e) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39575"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39588"}},{"Add":{"text":" logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39611"}},{"Add":{"text":" [sql| SELECT credit_to_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39648"}},{"Add":{"text":" credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39727"}},{"Add":{"text":" event_type, event_time, event_metadata","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39785"}},{"Add":{"text":" FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39814"}},{"Add":{"text":" WHERE project_id = ? AND user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39863"}},{"Add":{"text":" AND event_time >= ? AND event_time <= ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39915"}},{"Add":{"text":" ORDER BY event_time DESC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39952"}},{"Add":{"text":" LIMIT ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39972"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:39987"}},{"Add":{"text":" (pid, uid, fromThyme s, fromThyme e, limit)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40039"}},{"Add":{"text":" (After s) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40056"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40069"}},{"Add":{"text":" logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40092"}},{"Add":{"text":" [sql| SELECT credit_to_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40129"}},{"Add":{"text":" credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40208"}},{"Add":{"text":" event_type, event_time, event_metadata","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40266"}},{"Add":{"text":" FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40295"}},{"Add":{"text":" WHERE project_id = ? AND user_id = ? AND event_time >= ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40364"}},{"Add":{"text":" ORDER BY event_time DESC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40401"}},{"Add":{"text":" LIMIT ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40421"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40436"}},{"Add":{"text":" (pid, uid, fromThyme s, limit)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40475"}},{"Add":{"text":" (Always) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40491"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40504"}},{"Add":{"text":" logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40527"}},{"Add":{"text":" [sql| SELECT credit_to_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40564"}},{"Add":{"text":" credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40643"}},{"Add":{"text":" event_type, event_time, event_metadata","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40701"}},{"Add":{"text":" FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40730"}},{"Add":{"text":" WHERE project_id = ? AND user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40779"}},{"Add":{"text":" ORDER BY event_time DESC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40816"}},{"Add":{"text":" LIMIT ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40836"}},{"Add":{"text":" |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40851"}},{"Add":{"text":" (pid, uid, limit)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40877"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40878"}},{"Add":{"text":"amendEvent :: EventId -> EventAmendment -> DBM AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40937"}},{"Add":{"text":"amendEvent (EventId eid) = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40970"}},{"Add":{"text":" (TimeChange mt t) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:40993"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41005"}},{"Add":{"text":" AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41023"}},{"Add":{"text":" [sql| INSERT INTO event_time_amendments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41069"}},{"Add":{"text":" (event_id, amended_at, event_time)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41118"}},{"Add":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41165"}},{"Add":{"text":" (eid, fromThyme $ mt ^. _ModTime, fromThyme t)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41218"}},{"Add":{"text":" (CreditToChange mt c@(CreditToAccount acctId)) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41270"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41282"}},{"Add":{"text":" AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41300"}},{"Add":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41351"}},{"Add":{"text":" (event_id, amended_at, credit_to_type, credit_to_account)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41421"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41469"}},{"Add":{"text":" (eid, fromThyme $ mt ^. _ModTime, creditToName c, acctId ^. _AccountId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41547"}},{"Add":{"text":" (CreditToChange mt c@(CreditToProject pid)) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41596"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41608"}},{"Add":{"text":" AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41626"}},{"Add":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41677"}},{"Add":{"text":" (event_id, amended_at, credit_to_type, credit_to_project_id)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41752"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41802"}},{"Add":{"text":" (eid, fromThyme $ mt ^. _ModTime, creditToName c, pid ^. _ProjectId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41877"}},{"Add":{"text":" (CreditToChange mt c@(CreditToUser uid)) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41923"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41935"}},{"Add":{"text":" AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:41953"}},{"Add":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42004"}},{"Add":{"text":" (event_id, amended_at, credit_to_type, credit_to_user_id)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42076"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42126"}},{"Add":{"text":" (eid, fromThyme $ mt ^. _ModTime, creditToName c, uid ^. _UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42198"}},{"Add":{"text":" (MetadataChange mt v) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42225"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42237"}},{"Add":{"text":" AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42255"}},{"Add":{"text":" [sql| INSERT INTO event_metadata_amendments","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42305"}},{"Add":{"text":" (event_id, amended_at, event_metadata)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42358"}},{"Add":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42405"}},{"Add":{"text":" (eid, fromThyme $ mt ^. _ModTime, v)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42448"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42449"}},{"Add":{"text":"readWorkIndex :: ProjectId -> DBM WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42493"}},{"Add":{"text":"readWorkIndex (ProjectId pid) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42528"}},{"Add":{"text":" logEntries <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42544"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42555"}},{"Add":{"text":" logEntryParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42576"}},{"Add":{"text":" [sql| SELECT credit_to_type,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42611"}},{"Add":{"text":" credit_to_account, credit_to_user_id, credit_to_project_id,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42688"}},{"Add":{"text":" event_type, event_time, event_metadata","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42744"}},{"Add":{"text":" FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42771"}},{"Add":{"text":" WHERE project_id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42805"}},{"Add":{"text":" (Only pid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42822"}},{"Add":{"text":" pure $ workIndex logEntries","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42852"}}]}},{"FileAdd":{"meta":{"basename":"Json.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE TypeApplications #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42923"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42924"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Json where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42968"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:42969"}},{"Add":{"text":"import Aftok.Currency.Bitcoin (NetworkMode, Satoshi (..), _Satoshi, getNetwork)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43049"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin.Payments as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43109"}},{"Add":{"text":"import Aftok.Currency.Zcash (Zatoshi (..), _Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43162"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash.Payments as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43218"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash.Zip321 as Zip321","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43273"}},{"Add":{"text":"import Aftok.Json (idValue, obj, parseBtcAddr, v1)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43324"}},{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43352"}},{"Add":{"text":" ( NativePayment (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43376"}},{"Add":{"text":" NativeRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43400"}},{"Add":{"text":" Payment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43413"}},{"Add":{"text":" _PaymentRequestId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43436"}},{"Add":{"text":" nativePayment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43455"}},{"Add":{"text":" paymentDate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43472"}},{"Add":{"text":" paymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43492"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43496"}},{"Add":{"text":"-- import qualified Bippy.Proto as BP","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43534"}},{"Add":{"text":"import Control.Lens ((^.), (^?), _Just, review, to, view)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43592"}},{"Add":{"text":"import Data.Aeson","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43610"}},{"Add":{"text":"import Data.Aeson.Types (Parser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43643"}},{"Add":{"text":"import qualified Data.ByteString.Base64 as B64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43690"}},{"Add":{"text":"import Data.ProtocolBuffers (Decode, Encode, decodeMessage, encodeMessage)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43765"}},{"Add":{"text":"import Data.Serialize.Get (runGet)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43800"}},{"Add":{"text":"import Data.Serialize.Put (runPut)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43835"}},{"Add":{"text":"import Data.Text (unpack)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43861"}},{"Add":{"text":"-- import Data.Thyme.Calendar (showGregorian)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43907"}},{"Add":{"text":"import Haskoin.Address (addrToText)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43943"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43944"}},{"Add":{"text":"protoBase64 :: Encode a => a -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:43981"}},{"Add":{"text":"protoBase64 = B64.encodeBase64 . runPut . encodeMessage","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44037"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44038"}},{"Add":{"text":"fromBase64Proto :: Decode a => Text -> Either Text a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44091"}},{"Add":{"text":"fromBase64Proto t = (first toText . runGet decodeMessage) <=< B64.decodeBase64 $ encodeUtf8 t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44185"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44186"}},{"Add":{"text":"bip70PaymentRequestJSON :: Bitcoin.PaymentRequest -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44245"}},{"Add":{"text":"bip70PaymentRequestJSON r =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44273"}},{"Add":{"text":" v1 . obj $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44286"}},{"Add":{"text":" [ \"bip70_request\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44308"}},{"Add":{"text":" .= object","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44326"}},{"Add":{"text":" [ \"payment_key\" .= (r ^. Bitcoin.paymentRequestKey . Bitcoin._PaymentKey),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44411"}},{"Add":{"text":" \"payment_request_protobuf_64\" .= (r ^. Bitcoin.bip70Request . to protoBase64)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44501"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44513"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44519"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44520"}},{"Add":{"text":"parseBip70PaymentRequestJSON :: Value -> Parser Bitcoin.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44591"}},{"Add":{"text":"parseBip70PaymentRequestJSON = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44628"}},{"Add":{"text":" Object wrapper -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44651"}},{"Add":{"text":" o <- wrapper .: \"bip70_request\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44687"}},{"Add":{"text":" Bitcoin.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44714"}},{"Add":{"text":" <$> (Bitcoin.PaymentKey <$> o .: \"paymentKey\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44767"}},{"Add":{"text":" <*> ( either (fail . toString) pure . fromBase64Proto =<< (o .: \"payment_request_protobuf_64\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44868"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44880"}},{"Add":{"text":" nonobject ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44895"}},{"Add":{"text":" fail $ \"Value \" <> show nonobject <> \" is not a JSON object.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44961"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:44962"}},{"Add":{"text":"zip321PaymentRequestJSON :: Zip321.PaymentRequest -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45021"}},{"Add":{"text":"zip321PaymentRequestJSON r =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45050"}},{"Add":{"text":" v1 . obj $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45063"}},{"Add":{"text":" [\"zip321_request\" .= (toJSON . Zip321.toURI $ r)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45117"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45118"}},{"Add":{"text":"parseZip321PaymentRequestJSON :: Value -> Parser Zip321.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45189"}},{"Add":{"text":"parseZip321PaymentRequestJSON = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45227"}},{"Add":{"text":" Object o ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45241"}},{"Add":{"text":" either fail pure . Zip321.parseURI =<< (o .: \"zip321_request\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45308"}},{"Add":{"text":" nonobject ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45323"}},{"Add":{"text":" fail $ \"Value \" <> show nonobject <> \" is not a JSON object.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45389"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45390"}},{"Add":{"text":"nativeRequestJSON :: NativeRequest c -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45436"}},{"Add":{"text":"nativeRequestJSON = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45462"}},{"Add":{"text":" Bip70Request r -> bip70PaymentRequestJSON r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45508"}},{"Add":{"text":" Zip321Request r -> zip321PaymentRequestJSON r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45556"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45557"}},{"Add":{"text":"bitcoinPaymentJSON :: NetworkMode -> Bitcoin.Payment -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45619"}},{"Add":{"text":"bitcoinPaymentJSON nmode bp =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45649"}},{"Add":{"text":" object","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45658"}},{"Add":{"text":" [ \"amount\" .= (bp ^? Bitcoin.amount . _Just . _Satoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45719"}},{"Add":{"text":" \"txid\" .= (bp ^. Bitcoin.txid),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45757"}},{"Add":{"text":" \"address\" .= addrText,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45786"}},{"Add":{"text":" \"payment_key\" .= (bp ^. Bitcoin.paymentKey . Bitcoin._PaymentKey),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45859"}},{"Add":{"text":" \"payment_protobuf_64\" .= (bp ^. Bitcoin.bip70Payment . to protoBase64)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45936"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45942"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:45950"}},{"Add":{"text":" addrText = addrToText (getNetwork nmode) <$> (bp ^. Bitcoin.address)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46023"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46024"}},{"Add":{"text":"parseBitcoinPaymentJSON :: NetworkMode -> Value -> Parser Bitcoin.Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46098"}},{"Add":{"text":"parseBitcoinPaymentJSON nmode = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46136"}},{"Add":{"text":" Object o ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46150"}},{"Add":{"text":" Bitcoin.Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46170"}},{"Add":{"text":" <$> (fmap Satoshi <$> o .:? \"amount\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46214"}},{"Add":{"text":" <*> (o .:? \"txid\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46239"}},{"Add":{"text":" <*> (traverse (parseBtcAddr nmode) =<< o .:? \"address\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46301"}},{"Add":{"text":" <*> (Bitcoin.PaymentKey <$> o .: \"paymentKey\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46354"}},{"Add":{"text":" <*> ( either (fail . unpack) pure . fromBase64Proto =<< (o .: \"payment_protobuf_64\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46445"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46457"}},{"Add":{"text":" nonobject ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46472"}},{"Add":{"text":" fail $ \"Value \" <> show nonobject <> \" is not a JSON object.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46538"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46539"}},{"Add":{"text":"zcashPaymentJSON :: Zcash.Payment -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46582"}},{"Add":{"text":"zcashPaymentJSON zp =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46604"}},{"Add":{"text":" v1 . obj $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46617"}},{"Add":{"text":" [ \"amount\" .= (zp ^. Zcash.amount . _Zatoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46668"}},{"Add":{"text":" \"txid\" .= (zp ^. Zcash.txid . Zcash._TxId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46717"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46723"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46724"}},{"Add":{"text":"parseZcashPaymentJSON :: Value -> Parser Zcash.Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46779"}},{"Add":{"text":"parseZcashPaymentJSON = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46809"}},{"Add":{"text":" (Object o) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46825"}},{"Add":{"text":" Zcash.Payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46843"}},{"Add":{"text":" <$> (Zatoshi <$> o .: \"amount\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46881"}},{"Add":{"text":" <*> (review Zcash._TxId <$> o .: \"txid\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46928"}},{"Add":{"text":" val ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46937"}},{"Add":{"text":" fail $ \"Value \" <> show val <> \" is not a JSON object.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46997"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:46998"}},{"Add":{"text":"paymentJSON :: NetworkMode -> Payment c -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47047"}},{"Add":{"text":"paymentJSON nmode p =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47069"}},{"Add":{"text":" v1 . obj $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47082"}},{"Add":{"text":" [ \"payment_request_id\" .= idValue (paymentRequest . to getConst . _PaymentRequestId) p,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47174"}},{"Add":{"text":" \"payment_date\" .= view paymentDate p,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47218"}},{"Add":{"text":" \"payment_value\" .= nativePaymentValue","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47262"}},{"Add":{"text":" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47268"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47276"}},{"Add":{"text":" nativePaymentValue :: Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47308"}},{"Add":{"text":" nativePaymentValue = case view nativePayment p of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47362"}},{"Add":{"text":" BitcoinPayment bp -> bitcoinPaymentJSON nmode bp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47417"}},{"Add":{"text":" ZcashPayment bp -> zcashPaymentJSON bp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47462"}}]}},{"FileAdd":{"meta":{"basename":"Projects.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE QuasiQuotes #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47526"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47527"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Projects","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47569"}},{"Add":{"text":" ( createProject,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47588"}},{"Add":{"text":" listProjects,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47606"}},{"Add":{"text":" findProject,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47623"}},{"Add":{"text":" findUserProjects,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47645"}},{"Add":{"text":" addUserToProject,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47667"}},{"Add":{"text":" createInvitation,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47689"}},{"Add":{"text":" findInvitation,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47709"}},{"Add":{"text":" acceptInvitation,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47731"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47735"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47741"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47742"}},{"Add":{"text":"import Aftok.Database","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47764"}},{"Add":{"text":" ( InvitedUID,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47780"}},{"Add":{"text":" InvitingUID,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47797"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47801"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47840"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47849"}},{"Add":{"text":" SerDepFunction (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47874"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47888"}},{"Add":{"text":" pexec,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47899"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47912"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47924"}},{"Add":{"text":" ptransact,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47939"}},{"Add":{"text":" utcParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47954"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47958"}},{"Add":{"text":"import Aftok.Project","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:47979"}},{"Add":{"text":" ( Invitation (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48000"}},{"Add":{"text":" InvitationCode (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48025"}},{"Add":{"text":" Project (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48043"}},{"Add":{"text":" depf,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48053"}},{"Add":{"text":" inceptionDate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48072"}},{"Add":{"text":" initiator,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48087"}},{"Add":{"text":" projectName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48104"}},{"Add":{"text":" randomInvCode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48123"}},{"Add":{"text":" renderInvCode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48142"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48146"}},{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48165"}},{"Add":{"text":" ( Email (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48181"}},{"Add":{"text":" ProjectId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48201"}},{"Add":{"text":" UserId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48218"}},{"Add":{"text":" _ProjectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48234"}},{"Add":{"text":" _UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48247"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48251"}},{"Add":{"text":"import Control.Lens","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48271"}},{"Add":{"text":"import Data.Aeson (toJSON)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48298"}},{"Add":{"text":"import qualified Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48336"}},{"Add":{"text":"import Database.PostgreSQL.Simple (Only (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48382"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromField (fromJSONField)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48442"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow (RowParser, field, fieldWith)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48514"}},{"Add":{"text":"import Database.PostgreSQL.Simple.SqlQQ (sql)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48560"}},{"Add":{"text":"import Safe (headMay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48582"}},{"Add":{"text":"import Prelude hiding (null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48611"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48612"}},{"Add":{"text":"projectParser :: RowParser Project","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48647"}},{"Add":{"text":"projectParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48663"}},{"Add":{"text":" Project","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48673"}},{"Add":{"text":" <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48687"}},{"Add":{"text":" <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48705"}},{"Add":{"text":" <*> idParser UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48729"}},{"Add":{"text":" <*> (unSerDepFunction <$> fieldWith fromJSONField)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48784"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48785"}},{"Add":{"text":"invitationParser :: RowParser Invitation","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48826"}},{"Add":{"text":"invitationParser =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48845"}},{"Add":{"text":" Invitation","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48858"}},{"Add":{"text":" <$> idParser ProjectId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48885"}},{"Add":{"text":" <*> idParser UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48909"}},{"Add":{"text":" <*> fmap Email field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48934"}},{"Add":{"text":" <*> utcParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48952"}},{"Add":{"text":" <*> fmap (fmap C.toThyme) field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48988"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:48989"}},{"Add":{"text":"createProject :: Project -> DBM ProjectId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49031"}},{"Add":{"text":"createProject p =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49049"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49059"}},{"Add":{"text":" ProjectId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49073"}},{"Add":{"text":" [sql| INSERT INTO projects (project_name, inception_date, initiator_id, depreciation_fn)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49166"}},{"Add":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49212"}},{"Add":{"text":" ( p ^. projectName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49236"}},{"Add":{"text":" p ^. (inceptionDate . to C.fromThyme),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49281"}},{"Add":{"text":" p ^. (initiator . _UserId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49315"}},{"Add":{"text":" toJSON $ p ^. depf . to SerDepFunction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49360"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49366"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49367"}},{"Add":{"text":"listProjects :: DBM [ProjectId]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49399"}},{"Add":{"text":"listProjects =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49414"}},{"Add":{"text":" pquery (idParser ProjectId) [sql| SELECT id FROM projects |] ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49480"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49481"}},{"Add":{"text":"findProject :: ProjectId -> DBM (Maybe Project)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49529"}},{"Add":{"text":"findProject (ProjectId pid) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49559"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49569"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49584"}},{"Add":{"text":" projectParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49604"}},{"Add":{"text":" [sql| SELECT project_name, inception_date, initiator_id, depreciation_fn FROM projects WHERE id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49713"}},{"Add":{"text":" (Only pid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49730"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49731"}},{"Add":{"text":"findUserProjects :: UserId -> DBM [(ProjectId, Project)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49788"}},{"Add":{"text":"findUserProjects (UserId uid) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49820"}},{"Add":{"text":" pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49829"}},{"Add":{"text":" ((,) <$> idParser ProjectId <*> projectParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49880"}},{"Add":{"text":" [sql| SELECT DISTINCT ON (p.inception_date, p.id)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:49934"}},{"Add":{"text":" p.id, p.project_name, p.inception_date, p.initiator_id, p.depreciation_fn","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50018"}},{"Add":{"text":" FROM projects p LEFT OUTER JOIN project_companions pc ON pc.project_id = p.id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50106"}},{"Add":{"text":" WHERE pc.user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50137"}},{"Add":{"text":" OR p.initiator_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50169"}},{"Add":{"text":" ORDER BY p.inception_date, p.id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50214"}},{"Add":{"text":" (uid, uid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50229"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50230"}},{"Add":{"text":"addUserToProject :: ProjectId -> InvitingUID -> InvitedUID -> DBM ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50299"}},{"Add":{"text":"addUserToProject pid current new =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50334"}},{"Add":{"text":" void $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50343"}},{"Add":{"text":" pexec","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50353"}},{"Add":{"text":" [sql| INSERT INTO project_companions (project_id, user_id, invited_by) VALUES (?, ?, ?) |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50450"}},{"Add":{"text":" (pid ^. _ProjectId, new ^. _UserId, current ^. _UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50512"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50513"}},{"Add":{"text":"createInvitation :: ProjectId -> InvitingUID -> Email -> C.UTCTime -> DBM InvitationCode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50602"}},{"Add":{"text":"createInvitation (ProjectId pid) (UserId uid) (Email e) t = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50665"}},{"Add":{"text":" invCode <- liftIO randomInvCode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50699"}},{"Add":{"text":" void $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50708"}},{"Add":{"text":" pexec","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50718"}},{"Add":{"text":" [sql| INSERT INTO invitations (project_id, invitor_id, invitee_email, invitation_key, invitation_time)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50827"}},{"Add":{"text":" VALUES (?, ?, ?, ?, ?) |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50863"}},{"Add":{"text":" (pid, uid, e, renderInvCode invCode, C.fromThyme t)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50921"}},{"Add":{"text":" pure invCode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50936"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50937"}},{"Add":{"text":"findInvitation :: InvitationCode -> DBM (Maybe Invitation)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:50996"}},{"Add":{"text":"findInvitation ic =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51016"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51026"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51041"}},{"Add":{"text":" invitationParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51064"}},{"Add":{"text":" [sql| SELECT project_id, invitor_id, invitee_email, invitation_time, acceptance_time","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51155"}},{"Add":{"text":" FROM invitations WHERE invitation_key = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51208"}},{"Add":{"text":" (Only $ renderInvCode ic)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51240"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51241"}},{"Add":{"text":"acceptInvitation :: UserId -> InvitationCode -> C.UTCTime -> DBM ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51309"}},{"Add":{"text":"acceptInvitation (UserId uid) ic t = ptransact $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51361"}},{"Add":{"text":" void $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51370"}},{"Add":{"text":" pexec","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51380"}},{"Add":{"text":" [sql| UPDATE invitations SET acceptance_time = ? WHERE invitation_key = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51463"}},{"Add":{"text":" (C.fromThyme t, renderInvCode ic)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51503"}},{"Add":{"text":" void $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51512"}},{"Add":{"text":" pexec","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51522"}},{"Add":{"text":" [sql| INSERT INTO project_companions (project_id, user_id, invited_by, joined_at)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51610"}},{"Add":{"text":" SELECT i.project_id, ?, i.invitor_id, ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51660"}},{"Add":{"text":" FROM invitations i","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51689"}},{"Add":{"text":" WHERE i.invitation_key = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51729"}},{"Add":{"text":" (uid, C.fromThyme t, renderInvCode ic)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51774"}}]}},{"Replacement":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":1,"ins":{"up_context":[{"change":5,"pos":6073}],"down_context":[{"change":5,"pos":6119}],"flag":"BLOCK","start":51813,"end":52296,"inode":{"change":5,"pos":6073}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6073},"to":{"change":5,"start":6074,"end":6119},"introduced_by":5}],"inode":{"change":5,"pos":6073}},"ins_contents":[{"Add":{"text":"{-# LANGUAGE GeneralizedNewtypeDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51856"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51857"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51896"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51905"}},{"Add":{"text":" SerDepFunction (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51930"}},{"Add":{"text":" pexec,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51941"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51954"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51966"}},{"Add":{"text":" ptransact,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:51981"}},{"Add":{"text":" askNetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52001"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52015"}},{"Add":{"text":" utcParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52030"}},{"Add":{"text":" nullField,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52045"}},{"Add":{"text":" nominalDiffTimeParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52072"}},{"Add":{"text":" creditToParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52092"}},{"Add":{"text":" creditToName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52110"}},{"Add":{"text":" bitcoinAddressParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52136"}},{"Add":{"text":" zcashAddressParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52160"}},{"Add":{"text":" zcashIvkParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52180"}},{"Add":{"text":" currencyAmountParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52206"}},{"Add":{"text":" btcAmountParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52227"}},{"Add":{"text":" zecAmountParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52248"}},{"Add":{"text":" currencyType,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52266"}},{"Add":{"text":" currencyValue,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52285"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52289"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52295"}}],"del_contents":[{"Del":{"text":"module Aftok.Database.PostgreSQL.Types where","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:6118"}}]}},{"Edit":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":28,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":6120}],"down_context":[{"change":4,"pos":13894}],"flag":"BLOCK","start":52297,"end":52586,"inode":{"change":5,"pos":6073}}},"contents":[{"Add":{"text":"import Aftok.Currency (Amount (..), Currency (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52347"}},{"Add":{"text":"import Aftok.Currency.Bitcoin (Satoshi (..), _Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52402"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52453"}},{"Add":{"text":"import Aftok.Currency.Zcash (Zatoshi (..), _Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52506"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52553"}},{"Add":{"text":"import Aftok.Database (DBError)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52585"}}]}},{"Replacement":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":38,"ins":{"up_context":[{"change":4,"pos":13967}],"down_context":[{"change":4,"pos":14009}],"flag":"BLOCK","start":52587,"end":52739,"inode":{"change":5,"pos":6073}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":13967},"to":{"change":4,"start":13967,"end":14009},"introduced_by":4}],"inode":{"change":5,"pos":6073}},"ins_contents":[{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52605"}},{"Add":{"text":" ( AccountId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52625"}},{"Add":{"text":" CreditTo (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52644"}},{"Add":{"text":" DepreciationFunction,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52670"}},{"Add":{"text":" ProjectId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52690"}},{"Add":{"text":" UserId (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52707"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52711"}},{"Add":{"text":"import Control.Lens ((^.))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52738"}}],"del_contents":[{"Del":{"text":"import Aftok.Types (DepreciationFunction)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14008"}}]}},{"Edit":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":49,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":14063}],"down_context":[{"change":4,"pos":14063}],"flag":"BLOCK","start":52740,"end":53214,"inode":{"change":5,"pos":6073}}},"contents":[{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52743"}},{"Add":{"text":"import qualified Data.List as L","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52775"}},{"Add":{"text":"import qualified Data.Text as T","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52807"}},{"Add":{"text":"import Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52836"}},{"Add":{"text":"import Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52864"}},{"Add":{"text":"import Data.UUID (UUID)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52888"}},{"Add":{"text":"import Database.PostgreSQL.Simple","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52922"}},{"Add":{"text":" ( Connection,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52938"}},{"Add":{"text":" Query,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52949"}},{"Add":{"text":" ResultError (Incompatible),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52981"}},{"Add":{"text":" ToRow,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:52992"}},{"Add":{"text":" execute,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53005"}},{"Add":{"text":" fromOnly,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53019"}},{"Add":{"text":" query,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53030"}},{"Add":{"text":" queryWith,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53045"}},{"Add":{"text":" withTransaction,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53066"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53070"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromField","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53114"}},{"Add":{"text":" ( FieldParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53131"}},{"Add":{"text":" ResultError (ConversionFailed),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53167"}},{"Add":{"text":" fromField,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53182"}},{"Add":{"text":" returnError,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53199"}},{"Add":{"text":" typename,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53213"}}]}},{"Edit":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":73,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":14067}],"down_context":[{"change":5,"pos":6367}],"flag":"BLOCK","start":53215,"end":53424,"inode":{"change":5,"pos":6073}}},"contents":[{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow (RowParser, field, fieldWith)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53286"}},{"Add":{"text":"import Database.PostgreSQL.Simple.Types (Null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53333"}},{"Add":{"text":"import qualified Haskoin.Address as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53377"}},{"Add":{"text":"import qualified Haskoin.Constants as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53423"}}]}},{"Edit":{"inode":{"change":5,"pos":6073},"path":"lib/Aftok/Database/PostgreSQL/Types.hs","line":85,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":6630}],"down_context":[],"flag":"BLOCK","start":53425,"end":57193,"inode":{"change":5,"pos":6073}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53425"}},{"Add":{"text":"type DBM a = ReaderT (Bitcoin.NetworkMode, Connection) (ExceptT DBError IO) a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53503"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53504"}},{"Add":{"text":"pexec :: (ToRow d) => Query -> d -> DBM Int64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53550"}},{"Add":{"text":"pexec q d = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53565"}},{"Add":{"text":" conn <- asks snd","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53584"}},{"Add":{"text":" lift . lift $ execute conn q d","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53617"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53618"}},{"Add":{"text":"pinsert :: (ToRow d) => (UUID -> r) -> Query -> d -> DBM r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53677"}},{"Add":{"text":"pinsert f q d = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53696"}},{"Add":{"text":" conn <- asks snd","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53715"}},{"Add":{"text":" ids <- lift . lift $ query conn q d","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53753"}},{"Add":{"text":" pure . f . fromOnly $ L.head ids","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53788"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53789"}},{"Add":{"text":"pquery :: (ToRow d) => RowParser r -> Query -> d -> DBM [r]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53849"}},{"Add":{"text":"pquery p q d = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53867"}},{"Add":{"text":" conn <- asks snd","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53886"}},{"Add":{"text":" lift . lift $ queryWith p conn q d","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53923"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53924"}},{"Add":{"text":"ptransact :: DBM a -> DBM a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53952"}},{"Add":{"text":"ptransact rt = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53970"}},{"Add":{"text":" env <- ask","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:53983"}},{"Add":{"text":" lift . ExceptT $ withTransaction (snd env) (runExceptT $ runReaderT rt env)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54061"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54062"}},{"Add":{"text":"askNetworkMode :: DBM Bitcoin.NetworkMode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54104"}},{"Add":{"text":"askNetworkMode = asks fst","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54130"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54131"}},{"Add":{"text":"idParser :: (UUID -> a) -> RowParser a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54170"}},{"Add":{"text":"idParser f = f <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54195"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54196"}},{"Add":{"text":"utcParser :: RowParser C.UTCTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54229"}},{"Add":{"text":"utcParser = C.toThyme <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54261"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54262"}},{"Add":{"text":"nullField :: RowParser Null","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54290"}},{"Add":{"text":"nullField = field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54308"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54309"}},{"Add":{"text":"nominalDiffTimeParser :: FieldParser NominalDiffTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54362"}},{"Add":{"text":"nominalDiffTimeParser f v = C.fromSeconds' <$> fromField f v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54423"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54424"}},{"Add":{"text":"creditToName :: CreditTo -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54457"}},{"Add":{"text":"creditToName (CreditToAccount _) = \"credit_to_account\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54512"}},{"Add":{"text":"creditToName (CreditToUser _) = \"credit_to_user\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54561"}},{"Add":{"text":"creditToName (CreditToProject _) = \"credit_to_project\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54616"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54617"}},{"Add":{"text":"creditToParser :: RowParser CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54654"}},{"Add":{"text":"creditToParser = join $ fieldWith creditToParser'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54704"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54705"}},{"Add":{"text":"creditToParser' :: FieldParser (RowParser CreditTo)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54757"}},{"Add":{"text":"creditToParser' f v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54782"}},{"Add":{"text":" tn <- typename f","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54801"}},{"Add":{"text":" if tn /= \"credit_to_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54826"}},{"Add":{"text":" then returnError Incompatible f \"column was not of type credit_to_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54899"}},{"Add":{"text":" else maybe empty (pure . parser . decodeUtf8) v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54951"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:54959"}},{"Add":{"text":" parser :: Text -> RowParser CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55000"}},{"Add":{"text":" parser = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55019"}},{"Add":{"text":" \"credit_to_account\" ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55048"}},{"Add":{"text":" CreditToAccount <$> (idParser AccountId <* nullField <* nullField)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55123"}},{"Add":{"text":" \"credit_to_user\" ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55149"}},{"Add":{"text":" CreditToUser <$> (nullField *> idParser UserId <* nullField)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55218"}},{"Add":{"text":" \"credit_to_project\" ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55247"}},{"Add":{"text":" CreditToProject","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55271"}},{"Add":{"text":" <$> (nullField *> nullField *> idParser ProjectId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55332"}},{"Add":{"text":" _ -> empty","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55349"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55350"}},{"Add":{"text":"bitcoinAddressParser :: Bitcoin.NetworkMode -> RowParser Bitcoin.Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55423"}},{"Add":{"text":"bitcoinAddressParser nmode =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55452"}},{"Add":{"text":" fieldWith $ addrFieldParser (Bitcoin.getNetwork nmode)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55509"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55517"}},{"Add":{"text":" addrFieldParser :: Bitcoin.Network -> FieldParser Bitcoin.Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55587"}},{"Add":{"text":" addrFieldParser n f v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55618"}},{"Add":{"text":" fieldValue <- fromField f v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55652"}},{"Add":{"text":" let addrMay = Bitcoin.textToAddr n fieldValue","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55704"}},{"Add":{"text":" let err =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55720"}},{"Add":{"text":" returnError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55744"}},{"Add":{"text":" ConversionFailed","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55775"}},{"Add":{"text":" f","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55791"}},{"Add":{"text":" ( \"could not deserialize value \"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55838"}},{"Add":{"text":" <> T.unpack fieldValue","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55879"}},{"Add":{"text":" <> \" to a valid BTC address for network \"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55939"}},{"Add":{"text":" <> show n","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55967"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:55983"}},{"Add":{"text":" maybe err pure addrMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56012"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56013"}},{"Add":{"text":"btcAmountParser :: RowParser Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56050"}},{"Add":{"text":"btcAmountParser = (Satoshi . fromInteger) <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56102"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56103"}},{"Add":{"text":"zecAmountParser :: RowParser Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56140"}},{"Add":{"text":"zecAmountParser = (Zatoshi . fromInteger) <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56192"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56193"}},{"Add":{"text":"currencyAmountParser :: RowParser Amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56234"}},{"Add":{"text":"currencyAmountParser = join $ fieldWith currencyAmountParser'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56296"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56297"}},{"Add":{"text":"currencyAmountParser' :: FieldParser (RowParser Amount)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56353"}},{"Add":{"text":"currencyAmountParser' f v = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56384"}},{"Add":{"text":" tn <- typename f","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56403"}},{"Add":{"text":" if tn /= \"currency_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56427"}},{"Add":{"text":" then returnError Incompatible f \"column was not of type currency_t\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56499"}},{"Add":{"text":" else maybe empty (pure . parser . decodeUtf8) v","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56551"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56559"}},{"Add":{"text":" parser :: Text -> RowParser Amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56598"}},{"Add":{"text":" parser = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56617"}},{"Add":{"text":" \"ZEC\" -> Amount ZEC <$> zecAmountParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56663"}},{"Add":{"text":" \"BTC\" -> Amount BTC <$> btcAmountParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56709"}},{"Add":{"text":" _ -> empty","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56726"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56727"}},{"Add":{"text":"-- TODO: address validation here?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56761"}},{"Add":{"text":"zcashAddressParser :: RowParser Zcash.Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56807"}},{"Add":{"text":"zcashAddressParser = Zcash.Address <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56852"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56853"}},{"Add":{"text":"-- TODO: ivk validation here?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56883"}},{"Add":{"text":"zcashIvkParser :: RowParser Zcash.IVK","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56921"}},{"Add":{"text":"zcashIvkParser = Zcash.IVK <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56958"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56959"}},{"Add":{"text":"currencyType :: Amount -> Text","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:56990"}},{"Add":{"text":"currencyType = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57011"}},{"Add":{"text":" Amount BTC _ -> \"BTC\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57035"}},{"Add":{"text":" Amount ZEC _ -> \"ZEC\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57059"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57060"}},{"Add":{"text":"currencyValue :: Amount -> Word64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57094"}},{"Add":{"text":"currencyValue = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57116"}},{"Add":{"text":" Amount BTC sats -> sats ^. _Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57154"}},{"Add":{"text":" Amount ZEC zats -> zats ^. _Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57192"}}]}},{"FileAdd":{"meta":{"basename":"Users.hs","metadata":0},"context":[{"change":5,"pos":6049}],"contents":[{"Add":{"text":"{-# LANGUAGE GADTs #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57218"}},{"Add":{"text":"{-# LANGUAGE GeneralizedNewtypeDeriving #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57262"}},{"Add":{"text":"{-# LANGUAGE LambdaCase #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57290"}},{"Add":{"text":"{-# LANGUAGE QuasiQuotes #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57319"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57320"}},{"Add":{"text":"module Aftok.Database.PostgreSQL.Users","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57359"}},{"Add":{"text":" ( createUser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57375"}},{"Add":{"text":" findUser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57389"}},{"Add":{"text":" findUserByName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57409"}},{"Add":{"text":" findUserPaymentAddress,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57437"}},{"Add":{"text":" findAccountPaymentAddress,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57468"}},{"Add":{"text":" findAccountZcashIVK,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57493"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57497"}},{"Add":{"text":"where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57503"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57504"}},{"Add":{"text":"import Aftok.Currency (Currency (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57542"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57589"}},{"Add":{"text":"import Aftok.Database ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57614"}},{"Add":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57653"}},{"Add":{"text":" ( DBM,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57662"}},{"Add":{"text":" askNetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57682"}},{"Add":{"text":" bitcoinAddressParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57708"}},{"Add":{"text":" idParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57722"}},{"Add":{"text":" pinsert,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57735"}},{"Add":{"text":" pquery,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57747"}},{"Add":{"text":" zcashAddressParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57771"}},{"Add":{"text":" zcashIvkParser,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57791"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57795"}},{"Add":{"text":"import Aftok.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57814"}},{"Add":{"text":"import Control.Lens","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57834"}},{"Add":{"text":"import Database.PostgreSQL.Simple","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57868"}},{"Add":{"text":"import Database.PostgreSQL.Simple.FromRow","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57910"}},{"Add":{"text":"import Database.PostgreSQL.Simple.SqlQQ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57950"}},{"Add":{"text":" ( sql,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57959"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57963"}},{"Add":{"text":"import Safe (headMay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:57985"}},{"Add":{"text":"import Prelude hiding (null)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58014"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58015"}},{"Add":{"text":"userParser :: RowParser User","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58044"}},{"Add":{"text":"userParser = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58060"}},{"Add":{"text":" uname <- UserName <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58090"}},{"Add":{"text":" remail <- fmap (RecoverByEmail . Email) <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58142"}},{"Add":{"text":" rzaddr <- fmap (RecoverByZAddr . Zcash.Address) <$> field","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58202"}},{"Add":{"text":" User uname <$> maybe empty pure (remail <|> rzaddr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58256"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58257"}},{"Add":{"text":"createUser :: User -> DBM UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58290"}},{"Add":{"text":"createUser user' = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58312"}},{"Add":{"text":" pinsert","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58322"}},{"Add":{"text":" UserId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58333"}},{"Add":{"text":" [sql| INSERT INTO users (handle, recovery_email, recovery_zaddr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58402"}},{"Add":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58445"}},{"Add":{"text":" ( user' ^. (username . _UserName),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58484"}},{"Add":{"text":" user' ^? userAccountRecovery . _RecoverByEmail . _Email,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58547"}},{"Add":{"text":" user' ^? userAccountRecovery . _RecoverByZAddr . Zcash._Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58617"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58623"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58624"}},{"Add":{"text":"findUser :: UserId -> DBM (Maybe User)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58663"}},{"Add":{"text":"findUser (UserId uid) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58690"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58700"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58715"}},{"Add":{"text":" userParser","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58732"}},{"Add":{"text":" [sql| SELECT handle, recovery_email, recovery_zaddr FROM users WHERE id = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58817"}},{"Add":{"text":" (Only uid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58834"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58835"}},{"Add":{"text":"findUserByName :: UserName -> DBM (Maybe (UserId, User))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58892"}},{"Add":{"text":"findUserByName (UserName h) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58925"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58935"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58950"}},{"Add":{"text":" ((,) <$> idParser UserId <*> userParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:58997"}},{"Add":{"text":" [sql| SELECT id, handle, recovery_email, recovery_zaddr FROM users WHERE handle = ? |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59090"}},{"Add":{"text":" (Only h)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59105"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59106"}},{"Add":{"text":"findUserPaymentAddress :: UserId -> Currency a c -> DBM (Maybe a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59172"}},{"Add":{"text":"findUserPaymentAddress uid = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59207"}},{"Add":{"text":" BTC -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59219"}},{"Add":{"text":" mode <- askNetworkMode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59246"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59258"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59275"}},{"Add":{"text":" (bitcoinAddressParser mode)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59311"}},{"Add":{"text":" [sql| SELECT btc_addr FROM cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59370"}},{"Add":{"text":" WHERE user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59400"}},{"Add":{"text":" AND currency = 'BTC'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59433"}},{"Add":{"text":" AND is_primary = true |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59470"}},{"Add":{"text":" (Only $ view _UserId uid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59504"}},{"Add":{"text":" ZEC -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59516"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59528"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59545"}},{"Add":{"text":" (zcashAddressParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59574"}},{"Add":{"text":" [sql| SELECT zcash_addr FROM cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59635"}},{"Add":{"text":" WHERE user_id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59665"}},{"Add":{"text":" AND currency = 'ZEC'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59698"}},{"Add":{"text":" AND is_primary = true |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59735"}},{"Add":{"text":" (Only $ view _UserId uid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59769"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59770"}},{"Add":{"text":"findAccountPaymentAddress :: AccountId -> Currency a c -> DBM (Maybe a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59842"}},{"Add":{"text":"findAccountPaymentAddress aid = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59880"}},{"Add":{"text":" BTC -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59892"}},{"Add":{"text":" mode <- askNetworkMode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59919"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59931"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59948"}},{"Add":{"text":" (bitcoinAddressParser mode)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:59984"}},{"Add":{"text":" [sql| SELECT btc_addr FROM cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60043"}},{"Add":{"text":" WHERE id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60068"}},{"Add":{"text":" AND btc_addr IS NOT NULL |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60108"}},{"Add":{"text":" (Only $ view _AccountId aid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60145"}},{"Add":{"text":" ZEC -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60157"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60169"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60186"}},{"Add":{"text":" (zcashAddressParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60215"}},{"Add":{"text":" [sql| SELECT zcash_addr FROM cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60276"}},{"Add":{"text":" WHERE id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60301"}},{"Add":{"text":" AND zcash_addr IS NOT NULL |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60343"}},{"Add":{"text":" (Only $ view _AccountId aid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60380"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60381"}},{"Add":{"text":"-- TODO: rework this for the case where someone wants to","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60438"}},{"Add":{"text":"-- use new diversified addresses for each purchase?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60490"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60491"}},{"Add":{"text":"findAccountZcashIVK :: AccountId -> DBM (Maybe Zcash.IVK)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60549"}},{"Add":{"text":"findAccountZcashIVK aid =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60575"}},{"Add":{"text":" headMay","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60585"}},{"Add":{"text":" <$> pquery","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60600"}},{"Add":{"text":" (zcashIvkParser)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60623"}},{"Add":{"text":" [sql| SELECT zcash_ivk FROM cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60681"}},{"Add":{"text":" WHERE id = ?","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60706"}},{"Add":{"text":" AND zcash_ivk IS NOT NULL |]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60747"}},{"Add":{"text":" (Only $ view _AccountId aid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60782"}}]}},{"Replacement":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":12,"ins":{"up_context":[{"change":5,"pos":623}],"down_context":[{"change":4,"pos":14415}],"flag":"BLOCK","start":60818,"end":60869,"inode":{"change":5,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":623},"to":{"change":4,"start":14264,"end":14415},"introduced_by":4}],"inode":{"change":5,"pos":456}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Currency.Bitcoin as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60868"}}],"del_contents":[{"Del":{"text":"import qualified Aftok.Auction as A","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14299"}},{"Del":{"text":"import qualified Aftok.Billing as B","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14335"}},{"Del":{"text":"import Aftok.Currency.Bitcoin","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14365"}},{"Del":{"text":"import Aftok.Currency.Zcash (ZAddr (..), _ZAddr)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14414"}}]}},{"Replacement":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":14,"ins":{"up_context":[{"change":4,"pos":14437}],"down_context":[{"change":4,"pos":14794}],"flag":"BLOCK","start":60870,"end":61149,"inode":{"change":5,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":14437},"to":{"change":4,"start":14437,"end":14794},"introduced_by":4}],"inode":{"change":5,"pos":456}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Database.PostgreSQL.Auctions as Q","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60926"}},{"Add":{"text":"import qualified Aftok.Database.PostgreSQL.Billing as Q","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:60982"}},{"Add":{"text":"import qualified Aftok.Database.PostgreSQL.Events as Q","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61037"}},{"Add":{"text":"import qualified Aftok.Database.PostgreSQL.Projects as Q","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61094"}},{"Add":{"text":"import qualified Aftok.Database.PostgreSQL.Users as Q","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61148"}}],"del_contents":[{"Del":{"text":"import Aftok.Database.PostgreSQL.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14475"}},{"Del":{"text":" ( SerDepFunction (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14500"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14504"}},{"Del":{"text":"import Aftok.Interval","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14526"}},{"Del":{"text":"import Aftok.Json","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14544"}},{"Del":{"text":" ( billableJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14562"}},{"Del":{"text":" createSubscriptionJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14590"}},{"Del":{"text":" paymentJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14607"}},{"Del":{"text":" paymentRequestJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14631"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14635"}},{"Del":{"text":"import Aftok.Payments.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14663"}},{"Del":{"text":"import qualified Aftok.Project as P","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14699"}},{"Del":{"text":"import Aftok.TimeLog","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14720"}},{"Del":{"text":"import Aftok.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14739"}},{"Del":{"text":"import Bippy.Types (Satoshi (..))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14773"}},{"Del":{"text":"import Control.Lens","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14793"}}]}},{"Edit":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":24,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":14905},"to":{"change":4,"start":14905,"end":15252},"introduced_by":4}],"inode":{"change":5,"pos":456}}},"contents":[{"Del":{"text":"import Data.Aeson","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14922"}},{"Del":{"text":" ( Value,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14933"}},{"Del":{"text":" toJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14945"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14949"}},{"Del":{"text":"import Data.Hourglass","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:14971"}},{"Del":{"text":"import qualified Data.List as L","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15003"}},{"Del":{"text":"import Data.ProtocolBuffers","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15031"}},{"Del":{"text":" ( decodeMessage,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15050"}},{"Del":{"text":" encodeMessage,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15069"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15073"}},{"Del":{"text":"import Data.Serialize.Get (runGet)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15108"}},{"Del":{"text":"import Data.Serialize.Put (runPut)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15143"}},{"Del":{"text":"import qualified Data.Text as T","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15175"}},{"Del":{"text":"import Data.Thyme.Clock as C","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15204"}},{"Del":{"text":"import Data.Thyme.Time","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15227"}},{"Del":{"text":"import Data.UUID (UUID)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15251"}}]}},{"Edit":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":25,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":15286},"to":{"change":4,"start":15286,"end":15608},"introduced_by":4}],"inode":{"change":5,"pos":456}}},"contents":[{"Del":{"text":"import Database.PostgreSQL.Simple.FromField","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15329"}},{"Del":{"text":"import Database.PostgreSQL.Simple.FromRow","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15371"}},{"Del":{"text":"import Database.PostgreSQL.Simple.SqlQQ","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15411"}},{"Del":{"text":" ( sql,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15420"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15424"}},{"Del":{"text":"import Database.PostgreSQL.Simple.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15464"}},{"Del":{"text":" ( Null,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15474"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15478"}},{"Del":{"text":"import Haskoin.Address","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15501"}},{"Del":{"text":" ( Address,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15514"}},{"Del":{"text":" addrToText,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15530"}},{"Del":{"text":" textToAddr,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15546"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15550"}},{"Del":{"text":"import Haskoin.Constants (Network)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15585"}},{"Del":{"text":"import Safe (headMay)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15607"}}]}},{"Replacement":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":27,"ins":{"up_context":[{"change":5,"pos":1012}],"down_context":[{"change":5,"pos":264}],"flag":"BLOCK","start":61150,"end":61239,"inode":{"change":5,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1124},"to":{"change":5,"start":7077,"end":7158},"introduced_by":5}],"inode":{"change":5,"pos":456}},"ins_contents":[{"Add":{"text":"newtype QDBM a = QDBM (ReaderT (Bitcoin.NetworkMode, Connection) (ExceptT DBError IO) a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61238"}}],"del_contents":[{"Del":{"text":"newtype QDBM a = QDBM (ReaderT (NetworkMode, Connection) (ExceptT DBError IO) a)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7157"}}]}},{"Replacement":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":39,"ins":{"up_context":[{"change":5,"pos":343}],"down_context":[{"change":5,"pos":7230}],"flag":"BLOCK","start":61240,"end":61319,"inode":{"change":5,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":343},"to":{"change":5,"start":7159,"end":7230},"introduced_by":5}],"inode":{"change":5,"pos":456}},"ins_contents":[{"Add":{"text":"runQDBM :: Bitcoin.NetworkMode -> Connection -> QDBM a -> ExceptT DBError IO a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61318"}}],"del_contents":[{"Del":{"text":"runQDBM :: NetworkMode -> Connection -> QDBM a -> ExceptT DBError IO a","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7229"}}]}},{"Edit":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":41,"atom":{"EdgeMap":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":224},"to":{"change":5,"start":1215,"end":1216},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":240},"to":{"change":5,"start":1215,"end":1216},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":7323},"to":{"change":5,"start":1215,"end":1216},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15670},"to":{"change":5,"start":1215,"end":1216},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1215},"to":{"change":5,"start":1215,"end":1216},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1216},"to":{"change":5,"start":1472,"end":1536},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1536},"to":{"change":5,"start":1461,"end":1462},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1932},"to":{"change":5,"start":1461,"end":1462},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1461},"to":{"change":5,"start":1461,"end":1462},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1462},"to":{"change":5,"start":7324,"end":7497},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7497},"to":{"change":4,"start":15638,"end":15774},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":15774},"to":{"change":5,"start":15795,"end":15819},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15795},"to":{"change":5,"start":15795,"end":15819},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15819},"to":{"change":5,"start":7630,"end":7631},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7630},"to":{"change":5,"start":7630,"end":7631},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7631},"to":{"change":5,"start":1370,"end":1463},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1463},"to":{"change":5,"start":7718,"end":7761},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7718},"to":{"change":5,"start":7718,"end":7761},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7761},"to":{"change":4,"start":15775,"end":15843},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":15843},"to":{"change":5,"start":7829,"end":7935},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15890},"to":{"change":5,"start":7829,"end":7935},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7829},"to":{"change":5,"start":7829,"end":7935},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7935},"to":{"change":5,"start":382,"end":412},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":412},"to":{"change":5,"start":58323,"end":58363},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":58363},"to":{"change":4,"start":15844,"end":16087},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":186},"to":{"change":5,"start":2131,"end":2156},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":564},"to":{"change":5,"start":2131,"end":2156},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1307},"to":{"change":5,"start":2131,"end":2156},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16035},"to":{"change":5,"start":2131,"end":2156},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":16087},"to":{"change":5,"start":2131,"end":2156},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2131},"to":{"change":5,"start":2131,"end":2156},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2156},"to":{"change":5,"start":1545,"end":1546},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2363},"to":{"change":5,"start":1545,"end":1546},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1545},"to":{"change":5,"start":1545,"end":1546},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1546},"to":{"change":5,"start":2157,"end":2234},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":62},"to":{"change":5,"start":57,"end":58},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":568},"to":{"change":5,"start":57,"end":58},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2234},"to":{"change":5,"start":57,"end":58},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":51},"to":{"change":5,"start":57,"end":58},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":58},"to":{"change":5,"start":2235,"end":2298},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2298},"to":{"change":5,"start":66,"end":114},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1910},"to":{"change":5,"start":66,"end":114},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1832},"to":{"change":5,"start":114,"end":213},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":114},"to":{"change":5,"start":114,"end":213},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":213},"to":{"change":5,"start":1833,"end":1923},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1923},"to":{"change":4,"start":16088,"end":16328},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":8188},"to":{"change":5,"start":2299,"end":2353},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16250},"to":{"change":5,"start":2299,"end":2353},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":16328},"to":{"change":5,"start":2299,"end":2353},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2025},"to":{"change":5,"start":2299,"end":2353},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2353},"to":{"change":5,"start":16251,"end":16312},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":892},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1910},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2025},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2417},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16312},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":271},"to":{"change":5,"start":271,"end":272},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":272},"to":{"change":5,"start":8189,"end":8326},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":8326},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":293},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":294},"to":{"change":4,"start":16329,"end":16421},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":16421},"to":{"change":5,"start":4201,"end":4400},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16405},"to":{"change":5,"start":4201,"end":4400},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4400},"to":{"change":4,"start":16422,"end":16873},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1735},"to":{"change":5,"start":1409,"end":1410},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2618},"to":{"change":5,"start":1409,"end":1410},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4775},"to":{"change":5,"start":1409,"end":1410},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":16873},"to":{"change":5,"start":1409,"end":1410},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17038},"to":{"change":5,"start":1409,"end":1410},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1409},"to":{"change":5,"start":1409,"end":1410},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1410},"to":{"change":5,"start":8868,"end":8965},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8965},"to":{"change":5,"start":17039,"end":17142},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":424},"to":{"change":5,"start":2597,"end":2598},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17142},"to":{"change":5,"start":2597,"end":2598},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2597},"to":{"change":5,"start":2597,"end":2598},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2598},"to":{"change":4,"start":16874,"end":16959},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":16959},"to":{"change":5,"start":9084,"end":9109},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17228},"to":{"change":5,"start":9084,"end":9109},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9084},"to":{"change":5,"start":9084,"end":9109},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9109},"to":{"change":5,"start":17229,"end":17303},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9171},"to":{"change":5,"start":2021,"end":2022},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17303},"to":{"change":5,"start":2021,"end":2022},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":121},"to":{"change":5,"start":2021,"end":2022},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2022},"to":{"change":5,"start":2619,"end":2656},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2656},"to":{"change":5,"start":2023,"end":2039},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":652},"to":{"change":5,"start":2023,"end":2039},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2039},"to":{"change":5,"start":17304,"end":17439},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":724},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2178},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2864},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2873},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17439},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2729},"to":{"change":5,"start":2729,"end":2730},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2730},"to":{"change":5,"start":2874,"end":2903},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2903},"to":{"change":5,"start":2040,"end":2052},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":752},"to":{"change":5,"start":2040,"end":2052},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2052},"to":{"change":5,"start":17440,"end":17520},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":878},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2209},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2963},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3036},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17520},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2828},"to":{"change":5,"start":2828,"end":2829},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2829},"to":{"change":5,"start":1542,"end":1584},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1584},"to":{"change":5,"start":17521,"end":17557},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9273},"to":{"change":5,"start":17521,"end":17557},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17557},"to":{"change":4,"start":16960,"end":17122},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1115},"to":{"change":5,"start":3061,"end":3062},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1749},"to":{"change":5,"start":3061,"end":3062},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17122},"to":{"change":5,"start":3061,"end":3062},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17659},"to":{"change":5,"start":3061,"end":3062},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3061},"to":{"change":5,"start":3061,"end":3062},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3062},"to":{"change":5,"start":3037,"end":3074},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3074},"to":{"change":5,"start":2208,"end":2224},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1151},"to":{"change":5,"start":2208,"end":2224},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2224},"to":{"change":5,"start":17660,"end":17783},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":460},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1244},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3209},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9417},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17783},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":313},"to":{"change":5,"start":313,"end":314},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":314},"to":{"change":5,"start":3210,"end":3253},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3253},"to":{"change":5,"start":2279,"end":2298},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2317},"to":{"change":5,"start":2279,"end":2298},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2298},"to":{"change":5,"start":17784,"end":17927},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17927},"to":{"change":5,"start":3458,"end":3459},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1361},"to":{"change":5,"start":3458,"end":3459},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3459},"to":{"change":5,"start":3216,"end":3255},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3255},"to":{"change":5,"start":3499,"end":3516},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3499},"to":{"change":5,"start":3499,"end":3516},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3516},"to":{"change":5,"start":17928,"end":18161},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14078},"to":{"change":5,"start":3516,"end":3624},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18161},"to":{"change":5,"start":3516,"end":3624},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3516},"to":{"change":5,"start":3516,"end":3624},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3624},"to":{"change":5,"start":2238,"end":2308},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2308},"to":{"change":4,"start":17123,"end":17164},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17164},"to":{"change":5,"start":2350,"end":2408},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2350},"to":{"change":5,"start":2350,"end":2408},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2408},"to":{"change":4,"start":17165,"end":17293},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17293},"to":{"change":5,"start":3941,"end":3989},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3941},"to":{"change":5,"start":3941,"end":3989},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3989},"to":{"change":5,"start":1421,"end":1442},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1442},"to":{"change":5,"start":18162,"end":18233},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18233},"to":{"change":5,"start":3870,"end":3913},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3913},"to":{"change":5,"start":18233,"end":18296},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18233},"to":{"change":5,"start":18233,"end":18296},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18296},"to":{"change":5,"start":2247,"end":2297},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4146},"to":{"change":5,"start":2247,"end":2297},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2297},"to":{"change":5,"start":1443,"end":1466},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1466},"to":{"change":5,"start":18297,"end":18451},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18451},"to":{"change":4,"start":17294,"end":17348},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":461},"to":{"change":5,"start":2528,"end":2564},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17348},"to":{"change":5,"start":2528,"end":2564},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18511},"to":{"change":5,"start":2528,"end":2564},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2528},"to":{"change":5,"start":2528,"end":2564},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2564},"to":{"change":5,"start":1467,"end":1483},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1483},"to":{"change":5,"start":18512,"end":18672},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":285},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1361},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2726},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3748},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4146},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18672},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":293},"to":{"change":5,"start":293,"end":294},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":294},"to":{"change":5,"start":2349,"end":2396},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2396},"to":{"change":5,"start":505,"end":527},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1410},"to":{"change":5,"start":505,"end":527},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":527},"to":{"change":5,"start":9494,"end":9513},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9513},"to":{"change":5,"start":2532,"end":2565},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1439},"to":{"change":5,"start":2532,"end":2565},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1465},"to":{"change":5,"start":620,"end":621},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2565},"to":{"change":5,"start":620,"end":621},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":620},"to":{"change":5,"start":620,"end":621},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":621},"to":{"change":5,"start":2397,"end":2457},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2457},"to":{"change":5,"start":528,"end":554},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1527},"to":{"change":5,"start":528,"end":554},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":554},"to":{"change":5,"start":9514,"end":9533},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9533},"to":{"change":4,"start":17349,"end":17387},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2605},"to":{"change":5,"start":1579,"end":1614},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17387},"to":{"change":5,"start":1579,"end":1614},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1579},"to":{"change":5,"start":1579,"end":1614},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1614},"to":{"change":5,"start":1257,"end":1258},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1257},"to":{"change":5,"start":1257,"end":1258},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1258},"to":{"change":5,"start":1615,"end":1676},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1676},"to":{"change":5,"start":555,"end":580},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":580},"to":{"change":5,"start":9534,"end":9553},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9553},"to":{"change":5,"start":2620,"end":2726},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2620},"to":{"change":5,"start":2620,"end":2726},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2726},"to":{"change":5,"start":9554,"end":9645},"introduced_by":5}],"inode":{"change":5,"pos":456}}},"contents":[{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:1215"}},{"Del":{"text":"idParser :: (UUID -> a) -> RowParser a","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:1510"}},{"Del":{"text":"idParser f = f <$> field","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:1535"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:1461"}},{"Del":{"text":"networkIdParser :: FieldParser NetworkId","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7364"}},{"Del":{"text":"networkIdParser f b = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7389"}},{"Del":{"text":" networkName <- fromField f b","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7420"}},{"Del":{"text":" case networkName of","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7442"}},{"Del":{"text":" Just \"btc\" -> pure BTC","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7469"}},{"Del":{"text":" Just \"bch\" -> pure BCH","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7496"}},{"Del":{"text":" Just other ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15655"}},{"Del":{"text":" returnError","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15673"}},{"Del":{"text":" ConversionFailed","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15698"}},{"Del":{"text":" f","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15708"}},{"Del":{"text":" (\"Network identifier \" <> other <> \" is not supported.\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15773"}},{"Del":{"text":" Nothing -> pure BTC","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:15818"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7630"}},{"Del":{"text":"btcAddressParser :: NetworkMode -> RowParser (NetworkId, Address)","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:1435"}},{"Del":{"text":"btcAddressParser mode = do","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:1462"}},{"Del":{"text":" networkId <- fieldWith (networkIdParser)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7760"}},{"Del":{"text":" address <- fieldWith $ addrFieldParser (toNetwork mode networkId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15842"}},{"Del":{"text":" pure (networkId, address)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7856"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7857"}},{"Del":{"text":"addrFieldParser :: Network -> FieldParser Address","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7907"}},{"Del":{"text":"addrFieldParser n f v = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:7934"}},{"Del":{"text":" fieldValue <- fromField f v","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:411"}},{"Del":{"text":" let addrMay = textToAddr n fieldValue","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:58362"}},{"Del":{"text":" let err =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15855"}},{"Del":{"text":" returnError","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15875"}},{"Del":{"text":" ConversionFailed","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15902"}},{"Del":{"text":" f","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15914"}},{"Del":{"text":" ( \"could not deserialize value \"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15957"}},{"Del":{"text":" <> T.unpack fieldValue","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:15994"}},{"Del":{"text":" <> \" to a valid BTC address for network \"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16050"}},{"Del":{"text":" <> show n","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16074"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16086"}},{"Del":{"text":" maybe err pure addrMay","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2155"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:1545"}},{"Del":{"text":"btcParser :: RowParser Satoshi","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2187"}},{"Del":{"text":"btcParser = (Satoshi . fromInteger) <$> field","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2233"}},{"Del":{"text":"","pos":"7KZP4RHZ3QSYTPPQ257A65Z5UPX44TF2LAI2U5EMULQCLDCEUK2AC:57"}},{"Del":{"text":"utcParser :: RowParser C.UTCTime","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2267"}},{"Del":{"text":"utcParser = toThyme <$> field","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2297"}},{"Del":{"text":"","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:66"}},{"Del":{"text":"nullField :: RowParser Null","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:94"}},{"Del":{"text":"nullField = field","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:112"}},{"Del":{"text":"","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:113"}},{"Del":{"text":"eventTypeParser :: FieldParser (C.UTCTime -> LogEvent)","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:168"}},{"Del":{"text":"eventTypeParser f v = do","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:193"}},{"Del":{"text":" tn <- typename f","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:212"}},{"Del":{"text":" if tn /= \"event_t\"","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:1853"}},{"Del":{"text":" then returnError Incompatible f \"column was not of type event_t\"","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:1922"}},{"Del":{"text":" else","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16096"}},{"Del":{"text":" maybe","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16108"}},{"Del":{"text":" (returnError UnexpectedNull f \"event type may not be null\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16176"}},{"Del":{"text":" ( maybe (returnError Incompatible f \"unrecognized event type value\") pure","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16258"}},{"Del":{"text":" . nameEvent","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16282"}},{"Del":{"text":" . decodeUtf8","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16307"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16317"}},{"Del":{"text":" v","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16327"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2299"}},{"Del":{"text":"nominalDiffTimeParser :: FieldParser NominalDiffTime","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:2352"}},{"Del":{"text":"nominalDiffTimeParser f v = C.fromSeconds' <$> fromField f v","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:16311"}},{"Del":{"text":"","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:271"}},{"Del":{"text":"creditToParser :: NetworkMode -> RowParser (CreditTo (NetworkId, Address))","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:8263"}},{"Del":{"text":"creditToParser mode = join $ fieldWith (creditToParser' mode)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:8325"}},{"Del":{"text":"","pos":"Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC:293"}},{"Del":{"text":"creditToParser' ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16347"}},{"Del":{"text":" NetworkMode -> FieldParser (RowParser (CreditTo (NetworkId, Address)))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16420"}},{"Del":{"text":"creditToParser' mode f v = do","pos":"J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC:4230"}},{"Del":{"text":" tn <- typename f","pos":"J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC:4249"}},{"Del":{"text":" if tn /= \"credit_to_t\"","pos":"J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC:4274"}},{"Del":{"text":" then returnError Incompatible f \"column was not of type credit_to_t\"","pos":"J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC:4347"}},{"Del":{"text":" else maybe empty (pure . parser . decodeUtf8) v","pos":"J6S23MDGHVSCVVIRB6XRNSY3EGTDNWFJHV7RYLIEHBUK5KU63CFQC:4399"}},{"Del":{"text":" where","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16429"}},{"Del":{"text":" parser :: Text -> RowParser (CreditTo (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16493"}},{"Del":{"text":" parser = \\case","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16512"}},{"Del":{"text":" \"credit_to_address\" ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16541"}},{"Del":{"text":" CreditToCurrency <$> (btcAddressParser mode <* nullField <* nullField)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16620"}},{"Del":{"text":" \"credit_to_user\" ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16646"}},{"Del":{"text":" CreditToUser <$> (nullField *> nullField *> idParser UserId <* nullField)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16728"}},{"Del":{"text":" \"credit_to_project\" ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16757"}},{"Del":{"text":" CreditToProject","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16781"}},{"Del":{"text":" <$> (nullField *> nullField *> nullField *> idParser ProjectId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16855"}},{"Del":{"text":" _ -> empty","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16872"}},{"Del":{"text":"","pos":"RN7EI6INGUUHGMNY5RU3NH56WPLRZY5ZMYDNFMNE3TGV4ESFLQIAC:1409"}},{"Del":{"text":"logEntryParser :: NetworkMode -> RowParser (LogEntry (NetworkId, Address))","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:8942"}},{"Del":{"text":"logEntryParser mode =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:8964"}},{"Del":{"text":" LogEntry","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17049"}},{"Del":{"text":" <$> creditToParser mode","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17077"}},{"Del":{"text":" <*> (fieldWith eventTypeParser <*> utcParser)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17127"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17141"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:2597"}},{"Del":{"text":"qdbLogEntryParser ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16894"}},{"Del":{"text":" NetworkMode -> RowParser (KeyedLogEntry (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:16958"}},{"Del":{"text":"qdbLogEntryParser mode =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9108"}},{"Del":{"text":" (,,) <$> idParser ProjectId <*> idParser UserId <*> logEntryParser mode","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17302"}},{"Del":{"text":"","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2021"}},{"Del":{"text":"auctionParser :: RowParser A.Auction","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:2655"}},{"Del":{"text":"auctionParser =","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2038"}},{"Del":{"text":" A.Auction","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17315"}},{"Del":{"text":" <$> idParser ProjectId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17342"}},{"Del":{"text":" <*> idParser UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17366"}},{"Del":{"text":" <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17384"}},{"Del":{"text":" <*> btcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17402"}},{"Del":{"text":" <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17420"}},{"Del":{"text":" <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17438"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:2729"}},{"Del":{"text":"bidParser :: RowParser A.Bid","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:2902"}},{"Del":{"text":"bidParser =","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2051"}},{"Del":{"text":" A.Bid <$> idParser UserId <*> (Seconds <$> field) <*> btcParser <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17519"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:2828"}},{"Del":{"text":"userParser :: RowParser User","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:1570"}},{"Del":{"text":"userParser =","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:1583"}},{"Del":{"text":" User","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17527"}},{"Del":{"text":" <$> (UserName <$> field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17556"}},{"Del":{"text":" <*> ( (maybe empty pure =<< fmap (RecoverByEmail . Email) <$> field)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17032"}},{"Del":{"text":" <|> (maybe empty pure =<< fmap (RecoverByZAddr . ZAddr) <$> field)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17111"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17121"}},{"Del":{"text":"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:3061"}},{"Del":{"text":"projectParser :: RowParser P.Project","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:3073"}},{"Del":{"text":"projectParser =","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2223"}},{"Del":{"text":" P.Project","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17671"}},{"Del":{"text":" <$> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17685"}},{"Del":{"text":" <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17703"}},{"Del":{"text":" <*> idParser UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17727"}},{"Del":{"text":" <*> (unSerDepFunction <$> fieldWith fromJSONField)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17782"}},{"Del":{"text":"","pos":"TNR3TEHKVADAEZSTOD2XLSUTSW5AWST2YUW4CWK5KE7DSC6XHZNAC:313"}},{"Del":{"text":"invitationParser :: RowParser P.Invitation","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:3252"}},{"Del":{"text":"invitationParser =","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2297"}},{"Del":{"text":" P.Invitation","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17798"}},{"Del":{"text":" <$> idParser ProjectId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17825"}},{"Del":{"text":" <*> idParser UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17849"}},{"Del":{"text":" <*> fmap Email field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17874"}},{"Del":{"text":" <*> utcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17892"}},{"Del":{"text":" <*> fmap (fmap toThyme) field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17926"}},{"Del":{"text":"","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:3458"}},{"Del":{"text":"billableParser :: RowParser B.Billable","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3254"}},{"Del":{"text":"billableParser =","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:3515"}},{"Del":{"text":" B.Billable","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17940"}},{"Del":{"text":" <$> idParser ProjectId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17967"}},{"Del":{"text":" <*> idParser UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:17991"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18005"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18019"}},{"Del":{"text":" <*> recurrenceParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18044"}},{"Del":{"text":" <*> btcParser","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18062"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18076"}},{"Del":{"text":" <*> fieldWith (optionalField nominalDiffTimeParser)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18132"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18146"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18160"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3516"}},{"Del":{"text":"recurrenceParser :: RowParser B.Recurrence","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3559"}},{"Del":{"text":"recurrenceParser =","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3578"}},{"Del":{"text":" let prec :: Text -> RowParser B.Recurrence","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3623"}},{"Del":{"text":" prec = \\case","pos":"4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC:2256"}},{"Del":{"text":" \"annually\" -> nullField *> pure B.Annually","pos":"4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC:2307"}},{"Del":{"text":" \"monthly\" -> B.Monthly <$> field","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17163"}},{"Del":{"text":" --\"semimonthly\" = nullField *> pure B.SemiMonthly","pos":"4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC:2407"}},{"Del":{"text":" \"weekly\" -> B.Weekly <$> field","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17203"}},{"Del":{"text":" \"onetime\" -> nullField *> pure B.OneTime","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17252"}},{"Del":{"text":" _ -> empty","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17271"}},{"Del":{"text":" in field >>= prec","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17292"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3941"}},{"Del":{"text":"subscriptionParser :: RowParser B.Subscription","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:3988"}},{"Del":{"text":"subscriptionParser =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:1441"}},{"Del":{"text":" B.Subscription","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18178"}},{"Del":{"text":" <$> idParser UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18202"}},{"Del":{"text":" <*> idParser B.BillableId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18232"}},{"Del":{"text":" <*> (B.EmailChannel . Email <$> field)","pos":"ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC:3912"}},{"Del":{"text":" <*> (toThyme <$> field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18260"}},{"Del":{"text":" <*> ((fmap toThyme) <$> field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18295"}},{"Del":{"text":"","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:2247"}},{"Del":{"text":"paymentRequestParser :: RowParser PaymentRequest","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:2296"}},{"Del":{"text":"paymentRequestParser =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:1465"}},{"Del":{"text":" PaymentRequest","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18313"}},{"Del":{"text":" <$> fmap B.SubscriptionId field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18349"}},{"Del":{"text":" <*> ((either (const empty) pure . runGet decodeMessage) =<< field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18420"}},{"Del":{"text":" <*> fmap PaymentKey field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18450"}},{"Del":{"text":" <*> fmap toThyme field","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17320"}},{"Del":{"text":" <*> fmap toThyme field","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17347"}},{"Del":{"text":"","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:2528"}},{"Del":{"text":"paymentParser :: RowParser Payment","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:2563"}},{"Del":{"text":"paymentParser =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:1482"}},{"Del":{"text":" Payment","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18521"}},{"Del":{"text":" <$> (PaymentRequestId <$> field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18558"}},{"Del":{"text":" <*> (field >>= (either (const empty) pure . runGet decodeMessage))","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18629"}},{"Del":{"text":" <*> (toThyme <$> field)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18657"}},{"Del":{"text":" <*> field","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18671"}},{"Del":{"text":"","pos":"O5FVTOM6YFBLEPF3S576K6IMT6ZZ5VQCSB3YVXNS4CKBITKCRZ7AC:293"}},{"Del":{"text":"pexec :: (ToRow d) => Query -> d -> QDBM Int64","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2395"}},{"Del":{"text":"pexec q d = QDBM $ do","pos":"QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC:526"}},{"Del":{"text":" conn <- asks snd","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9512"}},{"Del":{"text":" lift . lift $ execute conn q d","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:2564"}},{"Del":{"text":"","pos":"LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC:620"}},{"Del":{"text":"pinsert :: (ToRow d) => (UUID -> r) -> Query -> d -> QDBM r","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:2456"}},{"Del":{"text":"pinsert f q d = QDBM $ do","pos":"QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC:553"}},{"Del":{"text":" conn <- asks snd","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9532"}},{"Del":{"text":" ids <- lift . lift $ query conn q d","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17386"}},{"Del":{"text":" pure . f . fromOnly $ L.head ids","pos":"GCVQD44VRPQVKPZEPIC4AOIXLJIG2ZMV3QI2Y7KALUT6NVUBSGSAC:1613"}},{"Del":{"text":"","pos":"A6HKMINBNGQLLX4QJMYWKQ4JAEHVJ4HIRVDKPPDI3FJUO2AAB7OQC:1257"}},{"Del":{"text":"pquery :: (ToRow d) => RowParser r -> Query -> d -> QDBM [r]","pos":"GCVQD44VRPQVKPZEPIC4AOIXLJIG2ZMV3QI2Y7KALUT6NVUBSGSAC:1675"}},{"Del":{"text":"pquery p q d = QDBM $ do","pos":"QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC:579"}},{"Del":{"text":" conn <- asks snd","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9552"}},{"Del":{"text":" lift . lift $ queryWith p conn q d","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:2656"}},{"Del":{"text":"","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:2657"}},{"Del":{"text":"transactQDBM :: QDBM a -> QDBM a","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:2690"}},{"Del":{"text":"transactQDBM (QDBM rt) = QDBM $ do","pos":"2XQD6KKKD6QVHFHAEMVE3XXY7X2T7BLTLL7XIILZAXNJJH2YONUQC:2725"}},{"Del":{"text":" env <- ask","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9566"}},{"Del":{"text":" lift . ExceptT $ withTransaction (snd env) (runExceptT $ runReaderT rt env)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9644"}}]}},{"Edit":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":42,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1362},"to":{"change":5,"start":3749,"end":3794},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3794},"to":{"change":5,"start":1377,"end":1413},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1413},"to":{"change":5,"start":462,"end":532},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":532},"to":{"change":4,"start":17388,"end":17672},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17672},"to":{"change":5,"start":747,"end":847},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":249},"to":{"change":5,"start":747,"end":847},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":351},"to":{"change":5,"start":4029,"end":4052},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":506},"to":{"change":5,"start":4029,"end":4052},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4029},"to":{"change":5,"start":4029,"end":4052},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4052},"to":{"change":5,"start":507,"end":531},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":531},"to":{"change":5,"start":848,"end":917},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":917},"to":{"change":5,"start":594,"end":661},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":594},"to":{"change":5,"start":594,"end":661},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":661},"to":{"change":5,"start":18937,"end":18959},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18959},"to":{"change":5,"start":9664,"end":9758},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9664},"to":{"change":5,"start":9664,"end":9758},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9758},"to":{"change":5,"start":14269,"end":14315},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14269},"to":{"change":5,"start":14269,"end":14315},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14315},"to":{"change":5,"start":918,"end":981},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":806},"to":{"change":5,"start":918,"end":981},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":981},"to":{"change":5,"start":9759,"end":9828},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":854},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":981},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1986},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3302},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4052},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9828},"to":{"change":5,"start":425,"end":426},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":425},"to":{"change":5,"start":425,"end":426},"introduced_by":5}],"inode":{"change":5,"pos":456}}},"contents":[{"Del":{"text":"storeEvent :: DBOp a -> Maybe (QDBM EventId)","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:3793"}},{"Del":{"text":"storeEvent (CreateBillable uid b) =","pos":"Q5X5RYQLP5K7REYD6VLHOKC4W36ZELJYA45V6YFKTD5S6MPN3NDQC:1412"}},{"Del":{"text":" Just $ storeEventJSON (Just uid) \"create_billable\" (billableJSON b)","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:531"}},{"Del":{"text":"storeEvent (CreateSubscription uid bid t) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17431"}},{"Del":{"text":" Just $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17440"}},{"Del":{"text":" storeEventJSON","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17459"}},{"Del":{"text":" (Just uid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17476"}},{"Del":{"text":" \"create_subscription\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17504"}},{"Del":{"text":" (createSubscriptionJSON uid bid t)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17545"}},{"Del":{"text":"storeEvent (CreatePaymentRequest req) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17585"}},{"Del":{"text":" Just $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17594"}},{"Del":{"text":" storeEventJSON Nothing \"create_payment_request\" (paymentRequestJSON req)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17671"}},{"Del":{"text":"storeEvent (CreatePayment req) =","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:779"}},{"Del":{"text":" Just $ storeEventJSON Nothing \"create_payment\" (paymentJSON req)","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:846"}},{"Del":{"text":"storeEvent _ = Nothing","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:4051"}},{"Del":{"text":"","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:507"}},{"Del":{"text":"type EventType = Text","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:529"}},{"Del":{"text":"","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:530"}},{"Del":{"text":"storeEventJSON :: Maybe UserId -> EventType -> Value -> QDBM EventId","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:916"}},{"Del":{"text":"storeEventJSON uid t v = do","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:621"}},{"Del":{"text":" timestamp <- liftIO C.getCurrentTime","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:660"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18946"}},{"Del":{"text":" EventId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:18958"}},{"Del":{"text":" [sql| INSERT INTO aftok_events","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9698"}},{"Del":{"text":" (event_time, created_by, event_type, event_json)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9757"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:14314"}},{"Del":{"text":" (fromThyme timestamp, preview (_Just . _UserId) uid, t, v)","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:980"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9759"}},{"Del":{"text":"askNetworkMode :: QDBM NetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9794"}},{"Del":{"text":"askNetworkMode = QDBM $ asks fst","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:9827"}},{"Del":{"text":"","pos":"3QVT6MA6I2CILQH3LUZABS4YQ7MN6CNRYTDRVS376OOHTPLYTFJAC:425"}}]}},{"Replacement":{"inode":{"change":5,"pos":456},"path":"lib/Aftok/Database/PostgreSQL.hs","line":43,"ins":{"up_context":[{"change":5,"pos":4296}],"down_context":[],"flag":"BLOCK","start":61320,"end":63741,"inode":{"change":5,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4296},"to":{"change":5,"start":18960,"end":19202},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19202},"to":{"change":5,"start":4,"end":94},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":94},"to":{"change":5,"start":10067,"end":10167},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14449},"to":{"change":5,"start":10067,"end":10167},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":10167},"to":{"change":5,"start":14551,"end":14581},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14551},"to":{"change":5,"start":14551,"end":14581},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14581},"to":{"change":4,"start":17673,"end":17852},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17852},"to":{"change":5,"start":19349,"end":19357},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19349},"to":{"change":5,"start":19349,"end":19357},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19357},"to":{"change":4,"start":17853,"end":17941},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":10399},"to":{"change":5,"start":14644,"end":14718},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":17941},"to":{"change":5,"start":14644,"end":14718},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":19438},"to":{"change":5,"start":14644,"end":14718},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14644},"to":{"change":5,"start":14644,"end":14718},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14718},"to":{"change":5,"start":10400,"end":10500},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":10500},"to":{"change":5,"start":14820,"end":14850},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14820},"to":{"change":5,"start":14820,"end":14850},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14850},"to":{"change":4,"start":17942,"end":18180},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18180},"to":{"change":5,"start":10662,"end":10816},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":19648},"to":{"change":5,"start":10662,"end":10816},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10662},"to":{"change":5,"start":10662,"end":10816},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":10816},"to":{"change":5,"start":15069,"end":15099},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15069},"to":{"change":5,"start":15069,"end":15099},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15099},"to":{"change":4,"start":18181,"end":18331},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18331},"to":{"change":5,"start":10817,"end":10880},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3406},"to":{"change":5,"start":10817,"end":10880},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10880},"to":{"change":4,"start":18332,"end":18428},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18428},"to":{"change":5,"start":565,"end":694},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10964},"to":{"change":5,"start":565,"end":694},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":694},"to":{"change":5,"start":11057,"end":11130},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11057},"to":{"change":5,"start":11057,"end":11130},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":11130},"to":{"change":5,"start":15347,"end":15373},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15347},"to":{"change":5,"start":15347,"end":15373},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15373},"to":{"change":4,"start":18429,"end":18446},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18446},"to":{"change":5,"start":2262,"end":2329},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1084},"to":{"change":5,"start":2262,"end":2329},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2329},"to":{"change":5,"start":11190,"end":11215},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11190},"to":{"change":5,"start":11190,"end":11215},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11215},"to":{"change":5,"start":2330,"end":2347},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2347},"to":{"change":4,"start":18447,"end":18545},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18545},"to":{"change":5,"start":730,"end":830},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":730},"to":{"change":5,"start":730,"end":830},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":830},"to":{"change":5,"start":11362,"end":11474},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":19984},"to":{"change":5,"start":11362,"end":11474},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11362},"to":{"change":5,"start":11362,"end":11474},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11474},"to":{"change":5,"start":2373,"end":2522},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2522},"to":{"change":4,"start":18546,"end":18685},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18685},"to":{"change":5,"start":866,"end":966},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":866},"to":{"change":5,"start":866,"end":966},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":966},"to":{"change":5,"start":11624,"end":11766},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20166},"to":{"change":5,"start":11624,"end":11766},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11624},"to":{"change":5,"start":11624,"end":11766},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11766},"to":{"change":5,"start":2587,"end":2719},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2719},"to":{"change":4,"start":18686,"end":18835},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18835},"to":{"change":5,"start":7432,"end":7617},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1002},"to":{"change":5,"start":7432,"end":7617},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7617},"to":{"change":5,"start":2794,"end":2935},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2935},"to":{"change":4,"start":18836,"end":18971},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":18971},"to":{"change":5,"start":3058,"end":3399},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3058},"to":{"change":5,"start":3058,"end":3399},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3399},"to":{"change":4,"start":18972,"end":19122},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19122},"to":{"change":5,"start":12081,"end":12126},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20508},"to":{"change":5,"start":12081,"end":12126},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12081},"to":{"change":5,"start":12081,"end":12126},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12126},"to":{"change":5,"start":16476,"end":16519},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16476},"to":{"change":5,"start":16476,"end":16519},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16519},"to":{"change":4,"start":19123,"end":19174},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19174},"to":{"change":5,"start":12127,"end":12213},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2904},"to":{"change":5,"start":12127,"end":12213},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4576},"to":{"change":5,"start":6673,"end":6685},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12213},"to":{"change":5,"start":6673,"end":6685},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6673},"to":{"change":5,"start":6673,"end":6685},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6685},"to":{"change":5,"start":12214,"end":12292},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12292},"to":{"change":5,"start":20559,"end":20593},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20593},"to":{"change":5,"start":12318,"end":12371},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12318},"to":{"change":5,"start":12318,"end":12371},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12371},"to":{"change":5,"start":124,"end":215},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":215},"to":{"change":5,"start":16675,"end":16725},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12444},"to":{"change":5,"start":16675,"end":16725},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16675},"to":{"change":5,"start":16675,"end":16725},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16725},"to":{"change":4,"start":19175,"end":19319},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19319},"to":{"change":5,"start":20706,"end":20716},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":58431},"to":{"change":5,"start":20706,"end":20716},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20706},"to":{"change":5,"start":20706,"end":20716},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20716},"to":{"change":4,"start":19320,"end":19434},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19434},"to":{"change":5,"start":12612,"end":12687},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20821},"to":{"change":5,"start":12612,"end":12687},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12612},"to":{"change":5,"start":12612,"end":12687},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12687},"to":{"change":5,"start":16883,"end":16933},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16883},"to":{"change":5,"start":16883,"end":16933},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16933},"to":{"change":4,"start":19435,"end":19623},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19623},"to":{"change":5,"start":12847,"end":12919},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20999},"to":{"change":5,"start":12847,"end":12919},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12847},"to":{"change":5,"start":12847,"end":12919},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":12919},"to":{"change":5,"start":17088,"end":17138},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17088},"to":{"change":5,"start":17088,"end":17138},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17138},"to":{"change":4,"start":19624,"end":19830},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19830},"to":{"change":5,"start":12990,"end":13039},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":21199},"to":{"change":5,"start":12990,"end":13039},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12990},"to":{"change":5,"start":12990,"end":13039},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13039},"to":{"change":5,"start":17261,"end":17304},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17261},"to":{"change":5,"start":17261,"end":17304},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17304},"to":{"change":4,"start":19831,"end":19872},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19872},"to":{"change":5,"start":13040,"end":13084},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4862},"to":{"change":5,"start":13040,"end":13084},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13084},"to":{"change":4,"start":19873,"end":19988},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":19988},"to":{"change":5,"start":1136,"end":1232},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1136},"to":{"change":5,"start":1136,"end":1232},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1232},"to":{"change":5,"start":13247,"end":13330},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13247},"to":{"change":5,"start":13247,"end":13330},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13330},"to":{"change":5,"start":17523,"end":17557},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17523},"to":{"change":5,"start":17523,"end":17557},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17557},"to":{"change":4,"start":19989,"end":20006},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":20006},"to":{"change":5,"start":8047,"end":8077},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8047},"to":{"change":5,"start":8047,"end":8077},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8077},"to":{"change":4,"start":20007,"end":20144},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13435},"to":{"change":5,"start":17664,"end":17710},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":20144},"to":{"change":5,"start":17664,"end":17710},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":21452},"to":{"change":5,"start":17664,"end":17710},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17664},"to":{"change":5,"start":17664,"end":17710},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17710},"to":{"change":4,"start":20145,"end":20479},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":20479},"to":{"change":5,"start":13602,"end":13626},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":21761},"to":{"change":5,"start":13602,"end":13626},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13602},"to":{"change":5,"start":13602,"end":13626},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13626},"to":{"change":5,"start":17863,"end":17889},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17863},"to":{"change":5,"start":17863,"end":17889},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17889},"to":{"change":4,"start":20480,"end":20670},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13731},"to":{"change":5,"start":17996,"end":18045},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":20670},"to":{"change":5,"start":17996,"end":18045},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":21943},"to":{"change":5,"start":17996,"end":18045},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17996},"to":{"change":5,"start":17996,"end":18045},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18045},"to":{"change":4,"start":20671,"end":21079},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21079},"to":{"change":5,"start":13783,"end":13814},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":705},"to":{"change":5,"start":13783,"end":13814},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":58467},"to":{"change":5,"start":22326,"end":22347},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14063},"to":{"change":5,"start":22326,"end":22347},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22347},"to":{"change":5,"start":1750,"end":1819},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1819},"to":{"change":5,"start":4,"end":47},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":47},"to":{"change":4,"start":21080,"end":21244},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1944},"to":{"change":5,"start":9510,"end":9516},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21244},"to":{"change":5,"start":9510,"end":9516},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":22421},"to":{"change":5,"start":9510,"end":9516},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9510},"to":{"change":5,"start":9510,"end":9516},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1369},"to":{"change":5,"start":14220,"end":14256},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14256},"to":{"change":4,"start":21245,"end":21389},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21389},"to":{"change":5,"start":14321,"end":14363},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3219},"to":{"change":5,"start":14321,"end":14363},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14363},"to":{"change":4,"start":21390,"end":21570},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21570},"to":{"change":5,"start":2215,"end":2265},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2215},"to":{"change":5,"start":2215,"end":2265},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2265},"to":{"change":5,"start":14363,"end":14388},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14363},"to":{"change":5,"start":14363,"end":14388},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14388},"to":{"change":4,"start":21571,"end":21735},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21735},"to":{"change":5,"start":14456,"end":14528},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9826},"to":{"change":5,"start":14456,"end":14528},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4993},"to":{"change":5,"start":9905,"end":9941},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14528},"to":{"change":5,"start":9905,"end":9941},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9905},"to":{"change":5,"start":9905,"end":9941},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9941},"to":{"change":4,"start":21736,"end":21864},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14651},"to":{"change":5,"start":18674,"end":18710},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21864},"to":{"change":5,"start":18674,"end":18710},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18674},"to":{"change":5,"start":18674,"end":18710},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18710},"to":{"change":4,"start":21865,"end":21923},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":21923},"to":{"change":5,"start":10145,"end":10160},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10145},"to":{"change":5,"start":10145,"end":10160},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10160},"to":{"change":4,"start":21924,"end":22092},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14779},"to":{"change":5,"start":18840,"end":18895},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22092},"to":{"change":5,"start":18840,"end":18895},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":22692},"to":{"change":5,"start":18840,"end":18895},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18840},"to":{"change":5,"start":18840,"end":18895},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18895},"to":{"change":4,"start":22093,"end":22127},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22127},"to":{"change":5,"start":5024,"end":5088},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3742},"to":{"change":5,"start":5024,"end":5088},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5088},"to":{"change":4,"start":22128,"end":22377},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22377},"to":{"change":5,"start":14897,"end":14976},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14897},"to":{"change":5,"start":14897,"end":14976},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":14976},"to":{"change":5,"start":19179,"end":19219},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19179},"to":{"change":5,"start":19179,"end":19219},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19219},"to":{"change":4,"start":22378,"end":22567},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15090},"to":{"change":5,"start":19337,"end":19383},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22567},"to":{"change":5,"start":19337,"end":19383},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":22862},"to":{"change":5,"start":19337,"end":19383},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19337},"to":{"change":5,"start":19337,"end":19383},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19383},"to":{"change":4,"start":22568,"end":22728},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22728},"to":{"change":5,"start":19385,"end":19407},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19385},"to":{"change":5,"start":19385,"end":19407},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19407},"to":{"change":5,"start":23011,"end":23077},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23077},"to":{"change":4,"start":22729,"end":22818},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":22818},"to":{"change":5,"start":15307,"end":15388},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":23161},"to":{"change":5,"start":15307,"end":15388},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15307},"to":{"change":5,"start":15307,"end":15388},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15388},"to":{"change":5,"start":19653,"end":19689},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19653},"to":{"change":5,"start":19653,"end":19689},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19689},"to":{"change":4,"start":22819,"end":23289},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4013},"to":{"change":5,"start":15643,"end":15762},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":23289},"to":{"change":5,"start":15643,"end":15762},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":23571},"to":{"change":5,"start":15643,"end":15762},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15643},"to":{"change":5,"start":15643,"end":15762},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15762},"to":{"change":5,"start":4014,"end":4091},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4091},"to":{"change":4,"start":23290,"end":23527},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":23527},"to":{"change":5,"start":15833,"end":15871},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1043},"to":{"change":5,"start":15833,"end":15871},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":900},"to":{"change":5,"start":11916,"end":11949},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5293},"to":{"change":5,"start":11916,"end":11949},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":15871},"to":{"change":5,"start":11916,"end":11949},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11916},"to":{"change":5,"start":11916,"end":11949},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11949},"to":{"change":5,"start":23795,"end":23822},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":23822},"to":{"change":5,"start":15895,"end":16025},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15895},"to":{"change":5,"start":15895,"end":16025},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16025},"to":{"change":5,"start":20437,"end":20526},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20437},"to":{"change":5,"start":20437,"end":20526},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20526},"to":{"change":5,"start":16026,"end":16069},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16069},"to":{"change":5,"start":20570,"end":20634},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20570},"to":{"change":5,"start":20570,"end":20634},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20634},"to":{"change":4,"start":23528,"end":23883},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3044},"to":{"change":5,"start":12451,"end":12457},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5564},"to":{"change":5,"start":12451,"end":12457},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":20720},"to":{"change":5,"start":12451,"end":12457},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":23883},"to":{"change":5,"start":12451,"end":12457},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12451},"to":{"change":5,"start":12451,"end":12457},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12457},"to":{"change":4,"start":23884,"end":24028},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":23953},"to":{"change":5,"start":16211,"end":16267},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24028},"to":{"change":5,"start":16211,"end":16267},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16211},"to":{"change":5,"start":16211,"end":16267},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16267},"to":{"change":5,"start":20884,"end":21023},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":20884},"to":{"change":5,"start":20884,"end":21023},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21023},"to":{"change":5,"start":16268,"end":16336},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16336},"to":{"change":5,"start":21092,"end":21120},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21092},"to":{"change":5,"start":21092,"end":21120},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21120},"to":{"change":4,"start":24029,"end":24232},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":24148},"to":{"change":5,"start":16500,"end":16611},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24232},"to":{"change":5,"start":16500,"end":16611},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16500},"to":{"change":5,"start":16500,"end":16611},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16611},"to":{"change":5,"start":21401,"end":21484},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21401},"to":{"change":5,"start":21401,"end":21484},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21484},"to":{"change":5,"start":16612,"end":16680},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16680},"to":{"change":5,"start":21553,"end":21589},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21553},"to":{"change":5,"start":21553,"end":21589},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21589},"to":{"change":4,"start":24233,"end":24264},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24264},"to":{"change":5,"start":16713,"end":16770},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3943},"to":{"change":5,"start":16713,"end":16770},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":566},"to":{"change":5,"start":576,"end":609},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1286},"to":{"change":5,"start":576,"end":609},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":5675},"to":{"change":5,"start":576,"end":609},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16770},"to":{"change":5,"start":576,"end":609},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":576},"to":{"change":5,"start":576,"end":609},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":609},"to":{"change":5,"start":24179,"end":24210},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":24210},"to":{"change":5,"start":16798,"end":16889},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16798},"to":{"change":5,"start":16798,"end":16889},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":16889},"to":{"change":5,"start":21744,"end":21790},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21744},"to":{"change":5,"start":21744,"end":21790},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21790},"to":{"change":4,"start":24265,"end":24375},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1354},"to":{"change":5,"start":647,"end":653},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24375},"to":{"change":5,"start":647,"end":653},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":647},"to":{"change":5,"start":647,"end":653},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":653},"to":{"change":4,"start":24376,"end":24530},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3982},"to":{"change":5,"start":16985,"end":17016},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":24400},"to":{"change":5,"start":16985,"end":17016},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24530},"to":{"change":5,"start":16985,"end":17016},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16985},"to":{"change":5,"start":16985,"end":17016},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17016},"to":{"change":5,"start":21920,"end":21948},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21920},"to":{"change":5,"start":21920,"end":21948},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21948},"to":{"change":4,"start":24531,"end":24761},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4062},"to":{"change":5,"start":17151,"end":17263},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":24607},"to":{"change":5,"start":17151,"end":17263},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24761},"to":{"change":5,"start":17151,"end":17263},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17151},"to":{"change":5,"start":17151,"end":17263},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17263},"to":{"change":5,"start":22200,"end":22234},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22200},"to":{"change":5,"start":22200,"end":22234},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22234},"to":{"change":4,"start":24762,"end":24802},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":24802},"to":{"change":5,"start":17305,"end":17349},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6109},"to":{"change":5,"start":17305,"end":17349},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":954},"to":{"change":5,"start":863,"end":896},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1028},"to":{"change":5,"start":863,"end":896},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6157},"to":{"change":5,"start":863,"end":896},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17349},"to":{"change":5,"start":863,"end":896},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":863},"to":{"change":5,"start":863,"end":896},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":896},"to":{"change":5,"start":24647,"end":24678},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":24678},"to":{"change":5,"start":17377,"end":17505},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17377},"to":{"change":5,"start":17377,"end":17505},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17505},"to":{"change":5,"start":22393,"end":22445},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22393},"to":{"change":5,"start":22393,"end":22445},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22445},"to":{"change":4,"start":24803,"end":25073},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3568},"to":{"change":5,"start":1180,"end":1186},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25073},"to":{"change":5,"start":1180,"end":1186},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1180},"to":{"change":5,"start":1180,"end":1186},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1186},"to":{"change":4,"start":25074,"end":25301},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25301},"to":{"change":5,"start":17674,"end":17730},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17674},"to":{"change":5,"start":17674,"end":17730},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17730},"to":{"change":5,"start":22674,"end":22741},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22674},"to":{"change":5,"start":22674,"end":22741},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22741},"to":{"change":4,"start":25302,"end":25511},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25511},"to":{"change":5,"start":17813,"end":17843},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17813},"to":{"change":5,"start":17813,"end":17843},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":17843},"to":{"change":5,"start":22955,"end":22979},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22955},"to":{"change":5,"start":22955,"end":22979},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22979},"to":{"change":4,"start":25512,"end":25727},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25727},"to":{"change":5,"start":18000,"end":18030},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18000},"to":{"change":5,"start":18000,"end":18030},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18030},"to":{"change":5,"start":23183,"end":23220},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23183},"to":{"change":5,"start":23183,"end":23220},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23220},"to":{"change":4,"start":25728,"end":25766},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25766},"to":{"change":5,"start":716,"end":750},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4073},"to":{"change":5,"start":716,"end":750},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":750},"to":{"change":5,"start":765,"end":846},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":846},"to":{"change":5,"start":25012,"end":25025},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25025},"to":{"change":4,"start":25767,"end":25928},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":25928},"to":{"change":5,"start":25196,"end":25241},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25196},"to":{"change":5,"start":25196,"end":25241},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":25241},"to":{"change":5,"start":18079,"end":18176},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18079},"to":{"change":5,"start":18079,"end":18176},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18176},"to":{"change":5,"start":4063,"end":4151},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4151},"to":{"change":5,"start":18247,"end":18336},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18247},"to":{"change":5,"start":18247,"end":18336},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18336},"to":{"change":5,"start":23531,"end":23694},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23531},"to":{"change":5,"start":23531,"end":23694},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23694},"to":{"change":5,"start":18337,"end":18487},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18487},"to":{"change":5,"start":23847,"end":23900},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23847},"to":{"change":5,"start":23847,"end":23900},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23900},"to":{"change":5,"start":18488,"end":18526},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18526},"to":{"change":5,"start":23939,"end":24012},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23939},"to":{"change":5,"start":23939,"end":24012},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24012},"to":{"change":5,"start":25242,"end":25284},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1642},"to":{"change":5,"start":18527,"end":18562},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1001},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1596},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4112},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6248},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18562},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":48},"to":{"change":5,"start":48,"end":81},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":81},"to":{"change":5,"start":25285,"end":25309},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":25309},"to":{"change":5,"start":18583,"end":18699},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18583},"to":{"change":5,"start":18583,"end":18699},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18699},"to":{"change":5,"start":24152,"end":24201},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24152},"to":{"change":5,"start":24152,"end":24201},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24201},"to":{"change":4,"start":25929,"end":26116},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":394},"to":{"change":5,"start":339,"end":345},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4351},"to":{"change":5,"start":339,"end":345},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":26116},"to":{"change":5,"start":339,"end":345},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":339},"to":{"change":5,"start":339,"end":345},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":345},"to":{"change":4,"start":26117,"end":26273},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":26273},"to":{"change":5,"start":18822,"end":18844},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":18822},"to":{"change":5,"start":18822,"end":18844},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18844},"to":{"change":5,"start":24349,"end":24389},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24349},"to":{"change":5,"start":24349,"end":24389},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24389},"to":{"change":4,"start":26274,"end":26312},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":26312},"to":{"change":5,"start":6249,"end":6294},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1045},"to":{"change":5,"start":6249,"end":6294},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6294},"to":{"change":5,"start":3944,"end":3945},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13039},"to":{"change":5,"start":3944,"end":3945},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4454},"to":{"change":5,"start":3944,"end":3945},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3945},"to":{"change":5,"start":13040,"end":13152},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13152},"to":{"change":5,"start":3945,"end":3946},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3945},"to":{"change":5,"start":3945,"end":3946},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3946},"to":{"change":5,"start":13153,"end":13185},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13185},"to":{"change":5,"start":24390,"end":24424},"introduced_by":5}],"inode":{"change":5,"pos":456}},"ins_contents":[{"Add":{"text":"pgEval =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61328"}},{"Add":{"text":" QDBM . \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61343"}},{"Add":{"text":" (CreateEvent pid uid lentry) -> Q.createEvent pid uid lentry","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61408"}},{"Add":{"text":" (FindEvent eid) -> Q.findEvent eid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61447"}},{"Add":{"text":" (FindEvents pid uid rquery limit) -> Q.findEvents pid uid rquery limit","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61522"}},{"Add":{"text":" (AmendEvent eid amendment) -> Q.amendEvent eid amendment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61583"}},{"Add":{"text":" (ReadWorkIndex pid) -> Q.readWorkIndex pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61630"}},{"Add":{"text":" (CreateAuction auc) -> Q.createAuction auc","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61677"}},{"Add":{"text":" (FindAuction aucId) -> Q.findAuction aucId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61724"}},{"Add":{"text":" (CreateBid aucId bid) -> Q.createBid aucId bid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61775"}},{"Add":{"text":" (FindBids aucId) -> Q.findBids aucId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61816"}},{"Add":{"text":" (CreateUser user') -> Q.createUser user'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61861"}},{"Add":{"text":" (FindUser uid) -> Q.findUser uid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61898"}},{"Add":{"text":" (FindUserByName n) -> Q.findUserByName n","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:61943"}},{"Add":{"text":" (FindUserPaymentAddress uid currency) -> Q.findUserPaymentAddress uid currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62026"}},{"Add":{"text":" (FindAccountPaymentAddress aid currency) -> Q.findAccountPaymentAddress aid currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62115"}},{"Add":{"text":" (FindAccountZcashIVK aid) -> Q.findAccountZcashIVK aid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62174"}},{"Add":{"text":" (CreateProject p) -> Q.createProject p","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62217"}},{"Add":{"text":" ListProjects -> Q.listProjects","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62252"}},{"Add":{"text":" (FindProject pid) -> Q.findProject pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62295"}},{"Add":{"text":" (FindUserProjects uid) -> Q.findUserProjects uid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62348"}},{"Add":{"text":" (AddUserToProject pid current new) -> Q.addUserToProject pid current new","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62425"}},{"Add":{"text":" (CreateInvitation pid uid e t) -> Q.createInvitation pid uid e t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62494"}},{"Add":{"text":" (FindInvitation ic) -> Q.findInvitation ic","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62541"}},{"Add":{"text":" (AcceptInvitation uid ic t) -> Q.acceptInvitation uid ic t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62604"}},{"Add":{"text":" dbop@(CreateBillable uid b) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62642"}},{"Add":{"text":" eventId <- Q.storeEvent' dbop","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62678"}},{"Add":{"text":" Q.createBillable eventId uid b","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62715"}},{"Add":{"text":" (FindBillable bid) -> Q.findBillable bid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62760"}},{"Add":{"text":" (FindBillables pid) -> Q.findBillables pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62807"}},{"Add":{"text":" dbop@(CreateSubscription uid bid start_date) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62862"}},{"Add":{"text":" eventId <- Q.storeEvent' dbop","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62898"}},{"Add":{"text":" Q.createSubscription eventId uid bid start_date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:62952"}},{"Add":{"text":" (FindSubscription sid) -> Q.findSubscription sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63005"}},{"Add":{"text":" (FindSubscriptions uid pid) -> Q.findSubscriptions uid pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63068"}},{"Add":{"text":" (FindSubscribers pid) -> Q.findSubscribers pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63119"}},{"Add":{"text":" dbop@(StorePaymentRequest req) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63160"}},{"Add":{"text":" eventId <- Q.storeEvent' dbop","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63196"}},{"Add":{"text":" Q.storePaymentRequest eventId Nothing req","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63244"}},{"Add":{"text":" (FindPaymentRequestByKey k) -> Q.findPaymentRequestByKey k","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63307"}},{"Add":{"text":" (FindPaymentRequestById prid) -> Q.findPaymentRequestById prid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63374"}},{"Add":{"text":" (FindSubscriptionPaymentRequests sid) -> Q.findSubscriptionPaymentRequests sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63457"}},{"Add":{"text":" (FindSubscriptionUnpaidRequests sid) -> Q.findSubscriptionUnpaidRequests sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63538"}},{"Add":{"text":" dbop@(CreatePayment p) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63571"}},{"Add":{"text":" eventId <- Q.storeEvent' dbop","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63607"}},{"Add":{"text":" Q.createPayment eventId p","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63639"}},{"Add":{"text":" (FindPayments ccy rid) -> Q.findPayments ccy rid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63692"}},{"Add":{"text":" (RaiseDBError err _) -> lift . throwE $ err","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63740"}}],"del_contents":[{"Del":{"text":"pgEval (CreateEvent (ProjectId pid) (UserId uid) (LogEntry c e m)) = case c of","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19038"}},{"Del":{"text":" CreditToCurrency (nid, addr) -> do","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19075"}},{"Del":{"text":" mode <- askNetworkMode","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19102"}},{"Del":{"text":" let network = toNetwork mode nid","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19139"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19151"}},{"Del":{"text":" EventId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19165"}},{"Del":{"text":" [sql| INSERT INTO work_events","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19201"}},{"Del":{"text":" ( project_id, user_id, credit_to_type, credit_to_network, credit_to_address","pos":"ZTPDQKLAB6JJGUFYNBE2OYDW7LV64FNI6BXBO3TBWOM4YF5UWI5QC:93"}},{"Del":{"text":" , event_type, event_time, event_metadata )","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10123"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10166"}},{"Del":{"text":" RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:14580"}},{"Del":{"text":" ( pid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17685"}},{"Del":{"text":" uid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17698"}},{"Del":{"text":" creditToName c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17722"}},{"Del":{"text":" renderNetworkId nid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17751"}},{"Del":{"text":" addrToText network addr,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17784"}},{"Del":{"text":" eventName e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17805"}},{"Del":{"text":" fromThyme $ e ^. eventTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17841"}},{"Del":{"text":" m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17851"}},{"Del":{"text":" )","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:19356"}},{"Del":{"text":" CreditToProject pid' ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17878"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17890"}},{"Del":{"text":" EventId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17904"}},{"Del":{"text":" [sql| INSERT INTO work_events","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17940"}},{"Del":{"text":" ( project_id, user_id, credit_to_type, credit_to_project_id","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:14717"}},{"Del":{"text":" , event_type, event_time, event_metadata )","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10456"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10499"}},{"Del":{"text":" RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:14849"}},{"Del":{"text":" ( pid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17954"}},{"Del":{"text":" uid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17967"}},{"Del":{"text":" creditToName c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:17991"}},{"Del":{"text":" pid' ^. _ProjectId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18019"}},{"Del":{"text":" eventName e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18040"}},{"Del":{"text":" fromThyme $ e ^. eventTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18076"}},{"Del":{"text":" m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18086"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18094"}},{"Del":{"text":" CreditToUser uid' ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18117"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18129"}},{"Del":{"text":" EventId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18143"}},{"Del":{"text":" [sql| INSERT INTO work_events","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18179"}},{"Del":{"text":" (project_id, user_id, credit_to_type, credit_to_user_id, event_type, event_time, event_metadata)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10772"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10815"}},{"Del":{"text":" RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:15098"}},{"Del":{"text":" ( pid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18193"}},{"Del":{"text":" uid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18206"}},{"Del":{"text":" creditToName c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18230"}},{"Del":{"text":" uid' ^. _UserId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18255"}},{"Del":{"text":" eventName e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18276"}},{"Del":{"text":" fromThyme $ e ^. eventTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18312"}},{"Del":{"text":" m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18322"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18330"}},{"Del":{"text":"pgEval (FindEvent (EventId eid)) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10854"}},{"Del":{"text":" mode <- askNetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:10879"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18341"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18356"}},{"Del":{"text":" (qdbLogEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18387"}},{"Del":{"text":" [sql| SELECT project_id, user_id,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18427"}},{"Del":{"text":" credit_to_type,","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:597"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:693"}},{"Del":{"text":" event_type, event_time, event_metadata FROM work_events","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11129"}},{"Del":{"text":" WHERE id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:15372"}},{"Del":{"text":" (Only eid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18445"}},{"Del":{"text":"pgEval (FindEvents (ProjectId pid) (UserId uid) rquery limit) = do","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2328"}},{"Del":{"text":" mode <- askNetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11214"}},{"Del":{"text":" case rquery of","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2346"}},{"Del":{"text":" (Before e) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18464"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18477"}},{"Del":{"text":" (logEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18507"}},{"Del":{"text":" [sql| SELECT credit_to_type,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18544"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:829"}},{"Del":{"text":" event_type, event_time,","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11406"}},{"Del":{"text":" event_metadata","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11442"}},{"Del":{"text":" FROM work_events","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11473"}},{"Del":{"text":" WHERE project_id = ? AND user_id = ? AND event_time <= ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2443"}},{"Del":{"text":" ORDER BY event_time DESC","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2482"}},{"Del":{"text":" LIMIT ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2504"}},{"Del":{"text":" |]","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2521"}},{"Del":{"text":" (pid, uid, fromThyme e, limit)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18584"}},{"Del":{"text":" (During s e) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18604"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18617"}},{"Del":{"text":" (logEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18647"}},{"Del":{"text":" [sql| SELECT credit_to_type,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18684"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:965"}},{"Del":{"text":" event_type, event_time, event_metadata","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11683"}},{"Del":{"text":" FROM work_events","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11714"}},{"Del":{"text":" WHERE project_id = ? AND user_id = ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:11765"}},{"Del":{"text":" AND event_time >= ? AND event_time <= ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2640"}},{"Del":{"text":" ORDER BY event_time DESC","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2679"}},{"Del":{"text":" LIMIT ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2701"}},{"Del":{"text":" |]","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2718"}},{"Del":{"text":" (pid, uid, fromThyme s, fromThyme e, limit)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18737"}},{"Del":{"text":" (After s) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18754"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18767"}},{"Del":{"text":" (logEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18797"}},{"Del":{"text":" [sql| SELECT credit_to_type,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18834"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"RSF6UAJKG7CEKILSVXI6C4YZXY7PIYZM2EMA2IXKQ7SADKNVSH7QC:7529"}},{"Del":{"text":" event_type, event_time, event_metadata","pos":"RSF6UAJKG7CEKILSVXI6C4YZXY7PIYZM2EMA2IXKQ7SADKNVSH7QC:7587"}},{"Del":{"text":" FROM work_events","pos":"RSF6UAJKG7CEKILSVXI6C4YZXY7PIYZM2EMA2IXKQ7SADKNVSH7QC:7616"}},{"Del":{"text":" WHERE project_id = ? AND user_id = ? AND event_time >= ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2862"}},{"Del":{"text":" ORDER BY event_time DESC","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2899"}},{"Del":{"text":" LIMIT ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2919"}},{"Del":{"text":" |]","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:2934"}},{"Del":{"text":" (pid, uid, fromThyme s, limit)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18874"}},{"Del":{"text":" (Always) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18890"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18903"}},{"Del":{"text":" (logEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18933"}},{"Del":{"text":" [sql| SELECT credit_to_type,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18970"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3157"}},{"Del":{"text":" event_type, event_time,","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3202"}},{"Del":{"text":" event_metadata","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3238"}},{"Del":{"text":" FROM work_events","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3269"}},{"Del":{"text":" WHERE project_id = ? AND user_id = ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3320"}},{"Del":{"text":" ORDER BY event_time DESC","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3359"}},{"Del":{"text":" LIMIT ?","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3381"}},{"Del":{"text":" |]","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:3398"}},{"Del":{"text":" (pid, uid, limit)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:18997"}},{"Del":{"text":"pgEval (AmendEvent (EventId eid) (TimeChange mt t)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19051"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19061"}},{"Del":{"text":" AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19077"}},{"Del":{"text":" [sql| INSERT INTO event_time_amendments","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19121"}},{"Del":{"text":" (event_id, amended_at, event_time)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12125"}},{"Del":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:16518"}},{"Del":{"text":" (eid, fromThyme $ mt ^. _ModTime, fromThyme t)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19173"}},{"Del":{"text":"pgEval (AmendEvent (EventId eid) (CreditToChange mt c)) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12187"}},{"Del":{"text":" mode <- askNetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12212"}},{"Del":{"text":" case c of","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:6684"}},{"Del":{"text":" CreditToCurrency (nid, addr) -> do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12252"}},{"Del":{"text":" let network = toNetwork mode nid","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12291"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:20572"}},{"Del":{"text":" AmendmentId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:20592"}},{"Del":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12370"}},{"Del":{"text":" (event_id, amended_at, credit_to_type, credit_to_network, credit_to_address)","pos":"ZTPDQKLAB6JJGUFYNBE2OYDW7LV64FNI6BXBO3TBWOM4YF5UWI5QC:214"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:16724"}},{"Del":{"text":" ( eid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19189"}},{"Del":{"text":" fromThyme $ mt ^. _ModTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19227"}},{"Del":{"text":" creditToName c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19253"}},{"Del":{"text":" renderNetworkId nid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19284"}},{"Del":{"text":" addrToText network addr","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19318"}},{"Del":{"text":" )","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:20715"}},{"Del":{"text":" CreditToProject pid ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19346"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19360"}},{"Del":{"text":" AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19380"}},{"Del":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19433"}},{"Del":{"text":" (event_id, amended_at, credit_to_type, credit_to_project_id)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12686"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:16932"}},{"Del":{"text":" (eid, fromThyme $ mt ^. _ModTime, creditToName c, pid ^. _ProjectId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19511"}},{"Del":{"text":" CreditToUser uid ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19535"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19549"}},{"Del":{"text":" AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19569"}},{"Del":{"text":" [sql| INSERT INTO event_credit_to_amendments","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19622"}},{"Del":{"text":" (event_id, amended_at, credit_to_type, credit_to_user_id)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:12918"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:17137"}},{"Del":{"text":" (eid, fromThyme $ mt ^. _ModTime, creditToName c, uid ^. _UserId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19697"}},{"Del":{"text":"pgEval (AmendEvent (EventId eid) (MetadataChange mt v)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19755"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19765"}},{"Del":{"text":" AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19781"}},{"Del":{"text":" [sql| INSERT INTO event_metadata_amendments","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19829"}},{"Del":{"text":" (event_id, amended_at, event_metadata)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13038"}},{"Del":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:17303"}},{"Del":{"text":" (eid, fromThyme $ mt ^. _ModTime, v)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19871"}},{"Del":{"text":"pgEval (ReadWorkIndex (ProjectId pid)) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13083"}},{"Del":{"text":" mode <- askNetworkMode","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19897"}},{"Del":{"text":" logEntries <-","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19913"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19924"}},{"Del":{"text":" (logEntryParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19952"}},{"Del":{"text":" [sql| SELECT credit_to_type,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:19987"}},{"Del":{"text":" credit_to_network, credit_to_address, credit_to_user_id, credit_to_project_id,","pos":"AWWC6P5ZVFDQHX3EAYDG4DKTUZ6A5LHQAV3NIUO3VP6FM7JKPK5AC:1231"}},{"Del":{"text":" event_type, event_time, event_metadata","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13302"}},{"Del":{"text":" FROM work_events","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13329"}},{"Del":{"text":" WHERE project_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:17556"}},{"Del":{"text":" (Only pid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20005"}},{"Del":{"text":" pure $ workIndex logEntries","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:8076"}},{"Del":{"text":"pgEval (CreateAuction auc) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20035"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20045"}},{"Del":{"text":" A.AuctionId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20061"}},{"Del":{"text":" [sql| INSERT INTO auctions (project_id, initiator_id, raise_amount, end_time)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20143"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:17709"}},{"Del":{"text":" ( auc ^. (A.projectId . _ProjectId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20185"}},{"Del":{"text":" auc ^. (A.initiator . _UserId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20223"}},{"Del":{"text":" auc ^. (A.raiseAmount . satoshi),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20263"}},{"Del":{"text":" auc ^. (A.auctionEnd . to fromThyme)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20306"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20312"}},{"Del":{"text":"pgEval (FindAuction aucId) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20341"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20351"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20366"}},{"Del":{"text":" auctionParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20386"}},{"Del":{"text":" [sql| SELECT project_id, initiator_id, created_at, raise_amount, start_time, end_time","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20478"}},{"Del":{"text":" FROM auctions","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13625"}},{"Del":{"text":" WHERE id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:17888"}},{"Del":{"text":" (Only (aucId ^. A._AuctionId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20516"}},{"Del":{"text":"pgEval (CreateBid (A.AuctionId aucId) bid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20561"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20571"}},{"Del":{"text":" A.BidId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20583"}},{"Del":{"text":" [sql| INSERT INTO bids (auction_id, bidder_id, bid_seconds, bid_amount, bid_time)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20669"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:18044"}},{"Del":{"text":" ( aucId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20683"}},{"Del":{"text":" bid ^. (A.bidUser . _UserId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20719"}},{"Del":{"text":" case bid ^. A.bidSeconds of","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20753"}},{"Del":{"text":" (Seconds i) -> i,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20779"}},{"Del":{"text":" bid ^. (A.bidAmount . satoshi),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20817"}},{"Del":{"text":" bid ^. (A.bidTime . to fromThyme)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20857"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20863"}},{"Del":{"text":"pgEval (FindBids aucId) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20889"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20898"}},{"Del":{"text":" ((,) <$> idParser A.BidId <*> bidParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:20943"}},{"Del":{"text":" [sql| SELECT id, bidder_id, bid_seconds, bid_amount, bid_time FROM bids WHERE auction_id = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21043"}},{"Del":{"text":" (Only (aucId ^. A._AuctionId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21078"}},{"Del":{"text":"pgEval (CreateUser user') = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:13813"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:22335"}},{"Del":{"text":" UserId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:22346"}},{"Del":{"text":" [sql| INSERT INTO users (handle, recovery_email, recovery_zaddr)","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:1818"}},{"Del":{"text":" VALUES (?, ?, ?) RETURNING id |]","pos":"F4ONFXF4MSA3QM64T7ATRVO3NQR2MC3RVZGVNGSQXCKXXQX2UG7QC:46"}},{"Del":{"text":" ( user' ^. (username . _UserName),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21118"}},{"Del":{"text":" user' ^? userAccountRecovery . _RecoverByEmail . _Email,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21181"}},{"Del":{"text":" user' ^? userAccountRecovery . _RecoverByZAddr . _ZAddr","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21243"}},{"Del":{"text":" )","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:9515"}},{"Del":{"text":"pgEval (FindUser (UserId uid)) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14255"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21254"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21269"}},{"Del":{"text":" userParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21286"}},{"Del":{"text":" [sql| SELECT handle, recovery_email, recovery_zaddr FROM users WHERE id = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21371"}},{"Del":{"text":" (Only uid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21388"}},{"Del":{"text":"pgEval (FindUserByName (UserName h)) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14362"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21399"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21414"}},{"Del":{"text":" ((,) <$> idParser UserId <*> userParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21461"}},{"Del":{"text":" [sql| SELECT id, handle, recovery_email, recovery_zaddr FROM users WHERE handle = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21554"}},{"Del":{"text":" (Only h)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21569"}},{"Del":{"text":"pgEval (FindUserPaymentAddress (UserId uid)) = do","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:2264"}},{"Del":{"text":" mode <- askNetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14387"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21580"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21595"}},{"Del":{"text":" (btcAddressParser mode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21625"}},{"Del":{"text":" [sql| SELECT default_payment_network, default_payment_addr FROM users WHERE id = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21717"}},{"Del":{"text":" (Only uid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21734"}},{"Del":{"text":"pgEval (CreateInvitation (ProjectId pid) (UserId uid) (Email e) t) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14527"}},{"Del":{"text":" invCode <- liftIO P.randomInvCode","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:9940"}},{"Del":{"text":" void $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21744"}},{"Del":{"text":" pexec","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21754"}},{"Del":{"text":" [sql| INSERT INTO invitations (project_id, invitor_id, invitee_email, invitation_key, invitation_time)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21863"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?) |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:18709"}},{"Del":{"text":" (pid, uid, e, P.renderInvCode invCode, fromThyme t)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21922"}},{"Del":{"text":" pure invCode","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:10159"}},{"Del":{"text":"pgEval (FindInvitation ic) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21952"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21962"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:21977"}},{"Del":{"text":" invitationParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22000"}},{"Del":{"text":" [sql| SELECT project_id, invitor_id, invitee_email, invitation_time, acceptance_time","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22091"}},{"Del":{"text":" FROM invitations WHERE invitation_key = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:18894"}},{"Del":{"text":" (Only $ P.renderInvCode ic)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22126"}},{"Del":{"text":"pgEval (AcceptInvitation (UserId uid) ic t) = transactQDBM $ do","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:5087"}},{"Del":{"text":" void $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22136"}},{"Del":{"text":" pexec","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22146"}},{"Del":{"text":" [sql| UPDATE invitations SET acceptance_time = ? WHERE invitation_key = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22229"}},{"Del":{"text":" (fromThyme t, P.renderInvCode ic)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22269"}},{"Del":{"text":" void $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22278"}},{"Del":{"text":" pexec","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22288"}},{"Del":{"text":" [sql| INSERT INTO project_companions (project_id, user_id, invited_by, joined_at)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22376"}},{"Del":{"text":" SELECT i.project_id, ?, i.invitor_id, ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14946"}},{"Del":{"text":" FROM invitations i","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:14975"}},{"Del":{"text":" WHERE i.invitation_key = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:19218"}},{"Del":{"text":" (uid, fromThyme t, P.renderInvCode ic)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22422"}},{"Del":{"text":"pgEval (CreateProject p) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22449"}},{"Del":{"text":" pinsert","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22459"}},{"Del":{"text":" ProjectId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22473"}},{"Del":{"text":" [sql| INSERT INTO projects (project_name, inception_date, initiator_id, depreciation_fn)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22566"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:19382"}},{"Del":{"text":" ( p ^. P.projectName,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22593"}},{"Del":{"text":" p ^. (P.inceptionDate . to fromThyme),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22638"}},{"Del":{"text":" p ^. (P.initiator . _UserId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22674"}},{"Del":{"text":" toJSON $ p ^. P.depf . to SerDepFunction","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22721"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22727"}},{"Del":{"text":"pgEval ListProjects =","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:19406"}},{"Del":{"text":" pquery (idParser ProjectId) [sql| SELECT id FROM projects |] ()","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:23076"}},{"Del":{"text":"pgEval (FindSubscribers pid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22759"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22768"}},{"Del":{"text":" (idParser UserId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22790"}},{"Del":{"text":" [sql| SELECT s.user_id","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22817"}},{"Del":{"text":" FROM subscripions s","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15336"}},{"Del":{"text":" JOIN billables b ON s.billable_id = b.id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15387"}},{"Del":{"text":" WHERE b.project_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:19688"}},{"Del":{"text":" (Only (pid ^. _ProjectId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22849"}},{"Del":{"text":"pgEval (FindProject (ProjectId pid)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22888"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22898"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22913"}},{"Del":{"text":" projectParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:22933"}},{"Del":{"text":" [sql| SELECT project_name, inception_date, initiator_id, depreciation_fn FROM projects WHERE id = ? |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23042"}},{"Del":{"text":" (Only pid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23059"}},{"Del":{"text":"pgEval (FindUserProjects (UserId uid)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23100"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23109"}},{"Del":{"text":" ((,) <$> idParser ProjectId <*> projectParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23160"}},{"Del":{"text":" [sql| SELECT DISTINCT ON (p.inception_date, p.id) p.id, p.project_name, p.inception_date, p.initiator_id, p.depreciation_fn","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23288"}},{"Del":{"text":" FROM projects p LEFT OUTER JOIN project_companions pc ON pc.project_id = p.id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15730"}},{"Del":{"text":" WHERE pc.user_id = ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15761"}},{"Del":{"text":" OR p.initiator_id = ?","pos":"ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC:4045"}},{"Del":{"text":" ORDER BY p.inception_date, p.id |]","pos":"ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC:4090"}},{"Del":{"text":" (uid, uid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23304"}},{"Del":{"text":"pgEval (AddUserToProject pid current new) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23348"}},{"Del":{"text":" void $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23357"}},{"Del":{"text":" pexec","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23367"}},{"Del":{"text":" [sql| INSERT INTO project_companions (project_id, user_id, invited_by) VALUES (?, ?, ?) |]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23464"}},{"Del":{"text":" (pid ^. _ProjectId, new ^. _UserId, current ^. _UserId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23526"}},{"Del":{"text":"pgEval dbop@(CreateBillable _ b) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15870"}},{"Del":{"text":" eventId <- requireEventId dbop","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:11948"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:23804"}},{"Del":{"text":" B.BillableId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:23821"}},{"Del":{"text":" [sql| INSERT INTO billables","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15926"}},{"Del":{"text":" ( project_id, event_id, name, description","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:15978"}},{"Del":{"text":" , recurrence_type, recurrence_count","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16024"}},{"Del":{"text":" , billing_amount, grace_period_days","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:20482"}},{"Del":{"text":" , payment_request_email_template","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:20525"}},{"Del":{"text":" , payment_request_memo_template)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16068"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:20633"}},{"Del":{"text":" ( b ^. (B.project . _ProjectId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23564"}},{"Del":{"text":" eventId ^. _EventId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23591"}},{"Del":{"text":" b ^. B.name,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23610"}},{"Del":{"text":" b ^. B.description,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23636"}},{"Del":{"text":" b ^. (B.recurrence . to B.recurrenceName),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23685"}},{"Del":{"text":" b ^. (B.recurrence . to B.recurrenceCount),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23735"}},{"Del":{"text":" b ^. (B.amount . satoshi),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23768"}},{"Del":{"text":" b ^. (B.gracePeriod),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23796"}},{"Del":{"text":" b ^. (B.paymentRequestEmailTemplate),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23840"}},{"Del":{"text":" b ^. (B.paymentRequestMemoTemplate)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23882"}},{"Del":{"text":" )","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:12456"}},{"Del":{"text":"pgEval (FindBillable bid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23911"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23921"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23936"}},{"Del":{"text":" billableParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:23957"}},{"Del":{"text":" [sql| SELECT b.project_id, e.created_by, b.name, b.description,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24027"}},{"Del":{"text":" b.recurrence_type, b.recurrence_count,","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16266"}},{"Del":{"text":" b.billing_amount, b.grace_period_days,","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:20939"}},{"Del":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21022"}},{"Del":{"text":" FROM billables b JOIN aftok_events e ON e.id = b.event_id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16335"}},{"Del":{"text":" WHERE b.id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21119"}},{"Del":{"text":" (Only (bid ^. B._BillableId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24064"}},{"Del":{"text":"pgEval (FindBillables pid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24093"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24102"}},{"Del":{"text":" ((,) <$> idParser B.BillableId <*> billableParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24157"}},{"Del":{"text":" [sql| SELECT b.id, b.project_id, e.created_by, b.name, b.description,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24231"}},{"Del":{"text":" b.recurrence_type, b.recurrence_count,","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16555"}},{"Del":{"text":" b.billing_amount, b.grace_period_days","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16610"}},{"Del":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21483"}},{"Del":{"text":" FROM billables b JOIN aftok_events e ON e.id = b.event_id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16679"}},{"Del":{"text":" WHERE b.project_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21588"}},{"Del":{"text":" (Only (pid ^. _ProjectId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24263"}},{"Del":{"text":"pgEval dbop@(CreateSubscription uid bid start_date) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16769"}},{"Del":{"text":" eventId <- requireEventId dbop","pos":"Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC:608"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:24188"}},{"Del":{"text":" B.SubscriptionId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:24209"}},{"Del":{"text":" [sql| INSERT INTO subscriptions","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16833"}},{"Del":{"text":" (user_id, billable_id, event_id, start_date)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:16888"}},{"Del":{"text":" VALUES (?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21789"}},{"Del":{"text":" ( view _UserId uid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24288"}},{"Del":{"text":" view B._BillableId bid,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24318"}},{"Del":{"text":" view _EventId eventId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24347"}},{"Del":{"text":" fromThyme start_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24374"}},{"Del":{"text":" )","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:652"}},{"Del":{"text":"pgEval (FindSubscription sid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24407"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24417"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24432"}},{"Del":{"text":" subscriptionParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24457"}},{"Del":{"text":" [sql| SELECT id, billable_id, contact_email, start_date, end_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24529"}},{"Del":{"text":" FROM subscriptions s","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17015"}},{"Del":{"text":" WHERE s.id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:21947"}},{"Del":{"text":" (Only (sid ^. B._SubscriptionId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24570"}},{"Del":{"text":"pgEval (FindSubscriptions uid pid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24607"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24616"}},{"Del":{"text":" ((,) <$> idParser B.SubscriptionId <*> subscriptionParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24679"}},{"Del":{"text":" [sql| SELECT s.id, user_id, billable_id, contact_email, start_date, end_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24760"}},{"Del":{"text":" FROM subscriptions s","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17181"}},{"Del":{"text":" JOIN billables b ON b.id = s.billable_id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17232"}},{"Del":{"text":" WHERE s.user_id = ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17262"}},{"Del":{"text":" AND b.project_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:22233"}},{"Del":{"text":" (uid ^. _UserId, pid ^. _ProjectId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24801"}},{"Del":{"text":"pgEval dbop@(CreatePaymentRequest req) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17348"}},{"Del":{"text":" eventId <- requireEventId dbop","pos":"Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC:895"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:24656"}},{"Del":{"text":" PaymentRequestId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:24677"}},{"Del":{"text":" [sql| INSERT INTO payment_requests","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17415"}},{"Del":{"text":" (subscription_id, event_id, request_data, url_key, request_time, billing_date)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17504"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:22444"}},{"Del":{"text":" ( req ^. (subscription . B._SubscriptionId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24851"}},{"Del":{"text":" eventId ^. _EventId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24878"}},{"Del":{"text":" req ^. (paymentRequest . to (runPut . encodeMessage)),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24939"}},{"Del":{"text":" req ^. (paymentKey . _PaymentKey),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:24980"}},{"Del":{"text":" req ^. (paymentRequestTime . to fromThyme),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25030"}},{"Del":{"text":" req ^. (billingDate . to fromThyme)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25072"}},{"Del":{"text":" )","pos":"Y3LIJ5USPMYBG7HKCIQBE7MWVGLQJPJSQD3KPZCTKXP22GOB535QC:1185"}},{"Del":{"text":"pgEval (FindPaymentRequest (PaymentKey k)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25118"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25128"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25143"}},{"Del":{"text":" ((,) <$> idParser PaymentRequestId <*> paymentRequestParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25210"}},{"Del":{"text":" [sql| SELECT id, subscription_id, request_data, url_key, request_time, billing_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25300"}},{"Del":{"text":" FROM payment_requests","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17703"}},{"Del":{"text":" WHERE url_key = ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17729"}},{"Del":{"text":" AND id NOT IN (SELECT payment_request_id FROM payments) |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:22740"}},{"Del":{"text":" (Only k)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25316"}},{"Del":{"text":"pgEval (FindPaymentRequestId (PaymentRequestId prid)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25372"}},{"Del":{"text":" headMay","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25382"}},{"Del":{"text":" <$> pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25397"}},{"Del":{"text":" paymentRequestParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25424"}},{"Del":{"text":" [sql| SELECT subscription_id, request_data, url_key, request_time, billing_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25510"}},{"Del":{"text":" FROM payment_requests","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:17842"}},{"Del":{"text":" WHERE id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:22978"}},{"Del":{"text":" (Only prid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25529"}},{"Del":{"text":"pgEval (FindPaymentRequests sid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25564"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25573"}},{"Del":{"text":" ((,) <$> idParser PaymentRequestId <*> paymentRequestParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25638"}},{"Del":{"text":" [sql| SELECT id, subscription_id, request_data, url_key, request_time, billing_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25726"}},{"Del":{"text":" FROM payment_requests","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18029"}},{"Del":{"text":" WHERE subscription_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:23219"}},{"Del":{"text":" (Only (sid ^. B._SubscriptionId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25765"}},{"Del":{"text":"pgEval (FindUnpaidRequests sid) =","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:749"}},{"Del":{"text":" let rowp :: RowParser (PaymentKey, PaymentRequest, B.Subscription, B.Billable)","pos":"4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC:845"}},{"Del":{"text":" rowp =","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25024"}},{"Del":{"text":" (,,,)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25780"}},{"Del":{"text":" <$> (PaymentKey <$> field)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25817"}},{"Del":{"text":" <*> paymentRequestParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25852"}},{"Del":{"text":" <*> subscriptionParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25885"}},{"Del":{"text":" <*> billableParser","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25914"}},{"Del":{"text":" in pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25927"}},{"Del":{"text":" rowp","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25208"}},{"Del":{"text":" [sql| SELECT r.url_key,","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25240"}},{"Del":{"text":" r.subscription_id, r.request_data, r.url_key, r.request_time, r.billing_date,","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18175"}},{"Del":{"text":" s.user_id, s.billable_id, s.contact_email, s.start_date, s.end_date,","pos":"ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC:4150"}},{"Del":{"text":" b.project_id, e.created_by, b.name, b.description, b.recurrence_type,","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18335"}},{"Del":{"text":" b.recurrence_count, b.billing_amount, b.grace_period_days,","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:23608"}},{"Del":{"text":" b.payment_request_email_template, b.payment_request_memo_template","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:23693"}},{"Del":{"text":" FROM payment_requests r","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18372"}},{"Del":{"text":" JOIN subscriptions s on s.id = r.subscription_id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18433"}},{"Del":{"text":" JOIN billables b on b.id = s.billable_id","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18486"}},{"Del":{"text":" JOIN aftok_events e on e.id = b.event_id","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:23899"}},{"Del":{"text":" WHERE subscription_id = ?","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18525"}},{"Del":{"text":" AND r.id NOT IN (SELECT payment_request_id FROM payments) |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:24011"}},{"Del":{"text":" (Only (sid ^. B._SubscriptionId))","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25283"}},{"Del":{"text":"pgEval dbop@(CreatePayment p) = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18561"}},{"Del":{"text":" eventId <- requireEventId dbop","pos":"QADKFHAR3KWQCNYU25Z7PJUGMD5WL26IU3DOAHBTRN2A7NKPUPKAC:80"}},{"Del":{"text":" pinsert","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25294"}},{"Del":{"text":" PaymentId","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:25308"}},{"Del":{"text":" [sql| INSERT INTO payments","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18613"}},{"Del":{"text":" (payment_request_id, event_id, payment_data, payment_date, exchange_rates)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18698"}},{"Del":{"text":" VALUES (?, ?, ?, ?, ?) RETURNING id |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:24200"}},{"Del":{"text":" ( p ^. (request . _PaymentRequestId),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25970"}},{"Del":{"text":" eventId ^. _EventId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:25997"}},{"Del":{"text":" p ^. (payment . to (runPut . encodeMessage)),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26049"}},{"Del":{"text":" p ^. (paymentDate . to fromThyme),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26090"}},{"Del":{"text":" p ^. exchangeRates","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26115"}},{"Del":{"text":" )","pos":"QADKFHAR3KWQCNYU25Z7PJUGMD5WL26IU3DOAHBTRN2A7NKPUPKAC:344"}},{"Del":{"text":"pgEval (FindPayments rid) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26144"}},{"Del":{"text":" pquery","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26153"}},{"Del":{"text":" ((,) <$> idParser PaymentId <*> paymentParser)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26204"}},{"Del":{"text":" [sql| SELECT id, payment_request_id, payment_data, payment_date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26272"}},{"Del":{"text":" FROM payments","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:18843"}},{"Del":{"text":" WHERE payment_request_id = ? |]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:24388"}},{"Del":{"text":" (Only (rid ^. _PaymentRequestId))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26311"}},{"Del":{"text":"pgEval (RaiseDBError err _) = raiseError err","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:6293"}},{"Del":{"text":"","pos":"DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC:3944"}},{"Del":{"text":"requireEventId :: DBOp a -> QDBM EventId","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:13080"}},{"Del":{"text":"requireEventId = maybe (raiseError EventStorageFailed) id . storeEvent","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:13151"}},{"Del":{"text":"","pos":"DFOBMSAODB3NKW37B272ZXA2ML5HMIH3N3C4GT2DPEQS7ZFK4SNAC:3945"}},{"Del":{"text":"raiseError :: DBError -> QDBM a","pos":"73NDXDEZRMK672GHSTC3CI6YHXFZ2GGJI5IKQGHKFDZKTNSQXLLQC:13184"}},{"Del":{"text":"raiseError = QDBM . lift . throwE","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:24423"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":11,"ins":{"up_context":[{"change":5,"pos":4986}],"down_context":[{"change":4,"pos":26495}],"flag":"BLOCK","start":63743,"end":63779,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4986},"to":{"change":4,"start":26469,"end":26495},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Auction as A","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63778"}}],"del_contents":[{"Del":{"text":"import Aftok.Auction as A","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26494"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":13,"ins":{"up_context":[{"change":4,"pos":26521}],"down_context":[{"change":4,"pos":26585}],"flag":"BLOCK","start":63780,"end":63955,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":26521},"to":{"change":4,"start":26521,"end":26585},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"import Aftok.Currency (Amount, Currency)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63820"}},{"Add":{"text":"import Aftok.Currency.Bitcoin.Payments (PaymentKey)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63872"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63919"}},{"Add":{"text":"import Aftok.Interval (RangeQuery)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63954"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Bitcoin (NetworkId)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26562"}},{"Del":{"text":"import Aftok.Interval","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26584"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":18,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":26613}],"down_context":[{"change":4,"pos":26613}],"flag":"BLOCK","start":63956,"end":64060,"inode":{"change":5,"pos":4936}}},"contents":[{"Add":{"text":" ( Payment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63968"}},{"Add":{"text":" PaymentId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:63983"}},{"Add":{"text":" PaymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64003"}},{"Add":{"text":" PaymentRequestId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64025"}},{"Add":{"text":" SomePaymentRequestDetail,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64055"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64059"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":26,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":26660}],"down_context":[{"change":4,"pos":26660}],"flag":"BLOCK","start":64061,"end":64144,"inode":{"change":5,"pos":4936}}},"contents":[{"Add":{"text":" ( AmendmentId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64077"}},{"Add":{"text":" EventAmendment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64097"}},{"Add":{"text":" EventId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64110"}},{"Add":{"text":" LogEntry,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64124"}},{"Add":{"text":" WorkIndex,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64139"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64143"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":33,"ins":{"up_context":[{"change":4,"pos":26679}],"down_context":[{"change":4,"pos":26697}],"flag":"BLOCK","start":64145,"end":64270,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":26679},"to":{"change":4,"start":26679,"end":26697},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" ( AccountId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64159"}},{"Add":{"text":" Email,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64170"}},{"Add":{"text":" ProjectId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64185"}},{"Add":{"text":" User,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64195"}},{"Add":{"text":" UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64207"}},{"Add":{"text":" UserName,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64221"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64225"}},{"Add":{"text":"import Aftok.Util (Program, fc, fromMaybeT)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64269"}}],"del_contents":[{"Del":{"text":"import Aftok.Util","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26696"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":47,"ins":{"up_context":[{"change":4,"pos":26779}],"down_context":[{"change":4,"pos":26803}],"flag":"BLOCK","start":64271,"end":64303,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":26779},"to":{"change":4,"start":26779,"end":26803},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"import Data.AffineSpace ((.-.))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64302"}}],"del_contents":[{"Del":{"text":"import Data.AffineSpace","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26802"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":52,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":26873},"to":{"change":4,"start":26873,"end":26906},"introduced_by":4}],"inode":{"change":5,"pos":4936}}},"contents":[{"Del":{"text":"import Haskoin.Address (Address)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26905"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":54,"ins":{"up_context":[{"change":5,"pos":5920}],"down_context":[{"change":5,"pos":18985}],"flag":"BLOCK","start":64304,"end":64355,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5920},"to":{"change":4,"start":26929,"end":26984},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"type KeyedLogEntry = (ProjectId, UserId, LogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64354"}}],"del_contents":[{"Del":{"text":"type KeyedLogEntry a = (ProjectId, UserId, LogEntry a)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:26983"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":60,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":19102},"to":{"change":5,"start":19102,"end":19137},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":19164},"to":{"change":5,"start":6137,"end":6138},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6137},"to":{"change":5,"start":6137,"end":6138},"introduced_by":5}],"inode":{"change":5,"pos":4936}}},"contents":[{"Del":{"text":"type BTCNet = (NetworkId, Address)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:19136"}},{"Del":{"text":"","pos":"QMRKFEPGFBCEWAIXPEIG5ILKAJ2JH5L3TOITHR4HNJXK5FN3KXBQC:6137"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":64,"ins":{"up_context":[{"change":4,"pos":27125}],"down_context":[{"change":4,"pos":27126}],"flag":"BLOCK","start":64356,"end":64561,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":27125},"to":{"change":5,"start":2555,"end":2615},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2555},"to":{"change":5,"start":2555,"end":2615},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" FindUserPaymentAddress :: UserId -> Currency a c -> DBOp (Maybe a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64424"}},{"Add":{"text":" FindAccountPaymentAddress :: AccountId -> Currency a c -> DBOp (Maybe a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64499"}},{"Add":{"text":" FindAccountZcashIVK :: AccountId -> DBOp (Maybe Zcash.IVK)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64560"}}],"del_contents":[{"Del":{"text":" FindUserPaymentAddress :: UserId -> DBOp (Maybe (BTCNet))","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:2614"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":70,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":27257},"to":{"change":4,"start":27257,"end":27305},"introduced_by":4}],"inode":{"change":5,"pos":4936}}},"contents":[{"Del":{"text":" FindSubscribers :: ProjectId -> DBOp [UserId]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27304"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":75,"ins":{"up_context":[{"change":5,"pos":2513}],"down_context":[{"change":5,"pos":3285}],"flag":"BLOCK","start":64562,"end":65274,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2513},"to":{"change":4,"start":27369,"end":28077},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" CreateEvent :: ProjectId -> UserId -> LogEntry -> DBOp EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64626"}},{"Add":{"text":" AmendEvent :: EventId -> EventAmendment -> DBOp AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64688"}},{"Add":{"text":" FindEvent :: EventId -> DBOp (Maybe KeyedLogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64741"}},{"Add":{"text":" FindEvents :: ProjectId -> UserId -> RangeQuery -> Word32 -> DBOp [LogEntry]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64820"}},{"Add":{"text":" ReadWorkIndex :: ProjectId -> DBOp WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64867"}},{"Add":{"text":" CreateAuction :: A.Auction -> DBOp A.AuctionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64916"}},{"Add":{"text":" FindAuction :: A.AuctionId -> DBOp (Maybe A.Auction)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:64971"}},{"Add":{"text":" CreateBid :: A.AuctionId -> A.Bid -> DBOp A.BidId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65023"}},{"Add":{"text":" FindBids :: A.AuctionId -> DBOp [(A.BidId, A.Bid)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65076"}},{"Add":{"text":" CreateBillable :: UserId -> Billable Amount -> DBOp BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65141"}},{"Add":{"text":" FindBillable :: BillableId -> DBOp (Maybe (Billable Amount))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65204"}},{"Add":{"text":" FindBillables :: ProjectId -> DBOp [(BillableId, Billable Amount)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65273"}}],"del_contents":[{"Del":{"text":" CreateEvent :: ProjectId -> UserId -> LogEntry BTCNet -> DBOp EventId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27440"}},{"Del":{"text":" AmendEvent :: EventId -> EventAmendment BTCNet -> DBOp AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27509"}},{"Del":{"text":" FindEvent :: EventId -> DBOp (Maybe (KeyedLogEntry BTCNet))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27571"}},{"Del":{"text":" FindEvents :: ProjectId -> UserId -> RangeQuery -> Word32 -> DBOp [LogEntry BTCNet]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27657"}},{"Del":{"text":" ReadWorkIndex :: ProjectId -> DBOp (WorkIndex BTCNet)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27713"}},{"Del":{"text":" CreateAuction :: Auction -> DBOp AuctionId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27758"}},{"Del":{"text":" FindAuction :: AuctionId -> DBOp (Maybe Auction)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27809"}},{"Del":{"text":" CreateBid :: AuctionId -> Bid -> DBOp BidId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27855"}},{"Del":{"text":" FindBids :: AuctionId -> DBOp [(BidId, Bid)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27902"}},{"Del":{"text":" CreateBillable :: UserId -> Billable -> DBOp BillableId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:27960"}},{"Del":{"text":" FindBillable :: BillableId -> DBOp (Maybe Billable)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28014"}},{"Del":{"text":" FindBillables :: ProjectId -> DBOp [(BillableId, Billable)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28076"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":89,"ins":{"up_context":[{"change":4,"pos":28144}],"down_context":[{"change":4,"pos":28710}],"flag":"BLOCK","start":65275,"end":66005,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":28144},"to":{"change":4,"start":28144,"end":28710},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" FindSubscriptions :: ProjectId -> UserId -> DBOp [(SubscriptionId, Subscription)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65358"}},{"Add":{"text":" FindSubscribers :: ProjectId -> DBOp [UserId]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65406"}},{"Add":{"text":" StorePaymentRequest :: PaymentRequest c -> DBOp PaymentRequestId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65473"}},{"Add":{"text":" FindPaymentRequestByKey :: PaymentKey -> DBOp (Maybe (PaymentRequestId, SomePaymentRequestDetail))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65574"}},{"Add":{"text":" FindPaymentRequestById :: PaymentRequestId -> DBOp (Maybe SomePaymentRequestDetail)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65660"}},{"Add":{"text":" FindSubscriptionPaymentRequests :: SubscriptionId -> DBOp [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65767"}},{"Add":{"text":" FindSubscriptionUnpaidRequests :: SubscriptionId -> DBOp [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65873"}},{"Add":{"text":" CreatePayment :: Payment c -> DBOp PaymentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:65920"}},{"Add":{"text":" FindPayments :: Currency a c -> PaymentRequestId -> DBOp [(PaymentId, Payment c)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66004"}}],"del_contents":[{"Del":{"text":" FindSubscriptions :: UserId -> ProjectId -> DBOp [(SubscriptionId, Subscription)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28227"}},{"Del":{"text":" CreatePaymentRequest :: PaymentRequest -> DBOp PaymentRequestId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28293"}},{"Del":{"text":" FindPaymentRequests :: SubscriptionId -> DBOp [(PaymentRequestId, PaymentRequest)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28378"}},{"Del":{"text":" FindUnpaidRequests :: SubscriptionId -> DBOp [BillDetail]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28438"}},{"Del":{"text":" FindPaymentRequest :: PaymentKey -> DBOp (Maybe (PaymentRequestId, PaymentRequest))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28524"}},{"Del":{"text":" FindPaymentRequestId :: PaymentRequestId -> DBOp (Maybe PaymentRequest)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28598"}},{"Del":{"text":" CreatePayment :: Payment -> DBOp PaymentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28643"}},{"Del":{"text":" FindPayments :: PaymentRequestId -> DBOp [(PaymentId, Payment)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:28709"}}]}},{"Edit":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":125,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":5275}],"down_context":[{"change":5,"pos":6782}],"flag":"BLOCK","start":66006,"end":66082,"inode":{"change":5,"pos":4936}}},"contents":[{"Add":{"text":"instance MonadDB m => MonadDB (ExceptT e m) where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66055"}},{"Add":{"text":" liftdb = lift . liftdb","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66080"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66081"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":145,"ins":{"up_context":[{"change":5,"pos":2786}],"down_context":[{"change":5,"pos":7626}],"flag":"BLOCK","start":66083,"end":66408,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2786},"to":{"change":5,"start":2786,"end":2921},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findUserPaymentAddress :: (MonadDB m) => UserId -> Currency a c -> MaybeT m a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66160"}},{"Add":{"text":"findUserPaymentAddress uid n = MaybeT . liftdb $ FindUserPaymentAddress uid n","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66238"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66239"}},{"Add":{"text":"findAccountPaymentAddress :: (MonadDB m) => AccountId -> Currency a c -> MaybeT m a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66323"}},{"Add":{"text":"findAccountPaymentAddress uid n = MaybeT . liftdb $ FindAccountPaymentAddress uid n","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66407"}}],"del_contents":[{"Del":{"text":"findUserPaymentAddress :: (MonadDB m) => UserId -> MaybeT m (BTCNet)","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:2854"}},{"Del":{"text":"findUserPaymentAddress = MaybeT . liftdb . FindUserPaymentAddress","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:2920"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":230,"ins":{"up_context":[{"change":4,"pos":29572}],"down_context":[{"change":5,"pos":819}],"flag":"BLOCK","start":66409,"end":66471,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":29572},"to":{"change":4,"start":29572,"end":29641},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" (MonadDB m) => ProjectId -> UserId -> LogEntry -> m EventId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66470"}}],"del_contents":[{"Del":{"text":" (MonadDB m) => ProjectId -> UserId -> LogEntry BTCNet -> m EventId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29640"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":234,"ins":{"up_context":[{"change":4,"pos":29656}],"down_context":[{"change":5,"pos":8764}],"flag":"BLOCK","start":66472,"end":66542,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":29656},"to":{"change":4,"start":29656,"end":29733},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" (MonadDB m) => UserId -> EventId -> EventAmendment -> m AmendmentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66541"}}],"del_contents":[{"Del":{"text":" (MonadDB m) => UserId -> EventId -> EventAmendment BTCNet -> m AmendmentId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:29732"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":245,"ins":{"up_context":[{"change":5,"pos":1147}],"down_context":[{"change":5,"pos":8744}],"flag":"BLOCK","start":66543,"end":66606,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1147},"to":{"change":5,"start":20042,"end":20114},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findEvent :: (MonadDB m) => EventId -> m (Maybe KeyedLogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66605"}}],"del_contents":[{"Del":{"text":"findEvent :: (MonadDB m) => EventId -> m (Maybe (KeyedLogEntry BTCNet))","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:20113"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":254,"ins":{"up_context":[{"change":4,"pos":29988}],"down_context":[{"change":5,"pos":3664}],"flag":"BLOCK","start":66607,"end":66622,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":29988},"to":{"change":4,"start":29988,"end":30010},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" m [LogEntry]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66621"}}],"del_contents":[{"Del":{"text":" m [LogEntry BTCNet]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30009"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":257,"ins":{"up_context":[{"change":5,"pos":8233}],"down_context":[{"change":5,"pos":9265}],"flag":"BLOCK","start":66623,"end":66690,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1304},"to":{"change":5,"start":20201,"end":20277},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"readWorkIndex :: (MonadDB m) => ProjectId -> UserId -> m WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66689"}}],"del_contents":[{"Del":{"text":"readWorkIndex :: (MonadDB m) => ProjectId -> UserId -> m (WorkIndex BTCNet)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:20276"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":262,"ins":{"up_context":[{"change":5,"pos":834}],"down_context":[{"change":5,"pos":1570}],"flag":"BLOCK","start":66691,"end":66766,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":834},"to":{"change":5,"start":8968,"end":9036},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"createBillable :: (MonadDB m) => UserId -> Billable Amount -> m BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66765"}}],"del_contents":[{"Del":{"text":"createBillable :: (MonadDB m) => UserId -> Billable -> m BillableId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:9035"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":266,"ins":{"up_context":[{"change":5,"pos":4547}],"down_context":[{"change":5,"pos":5525}],"flag":"BLOCK","start":66767,"end":66839,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4547},"to":{"change":5,"start":5462,"end":5525},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findBillable :: (MonadDB m) => BillableId -> MaybeT m (Billable Amount)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66838"}}],"del_contents":[{"Del":{"text":"findBillable :: (MonadDB m) => BillableId -> MaybeT m Billable","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:5524"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":270,"ins":{"up_context":[{"change":4,"pos":30032}],"down_context":[{"change":5,"pos":5729}],"flag":"BLOCK","start":66840,"end":66978,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":30032},"to":{"change":4,"start":30032,"end":30107},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":29467},"to":{"change":5,"start":5666,"end":5729},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":30107},"to":{"change":5,"start":5666,"end":5729},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5666},"to":{"change":5,"start":5666,"end":5729},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" (MonadDB m) => ProjectId -> UserId -> m [(SubscriptionId, Subscription)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66914"}},{"Add":{"text":"findSubscriptions pid uid = liftdb $ FindSubscriptions pid uid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:66977"}}],"del_contents":[{"Del":{"text":" (MonadDB m) => UserId -> ProjectId -> m [(SubscriptionId, Subscription)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30106"}},{"Del":{"text":"findSubscriptions uid pid = liftdb $ FindSubscriptions uid pid","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:5728"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":274,"ins":{"up_context":[{"change":4,"pos":30136}],"down_context":[{"change":5,"pos":5825}],"flag":"BLOCK","start":66979,"end":67064,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":30136},"to":{"change":4,"start":30136,"end":30212},"introduced_by":4}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" (MonadDB m) => SubscriptionId -> MaybeT m (Subscription' UserId (Billable Amount))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67063"}}],"del_contents":[{"Del":{"text":" (MonadDB m) => SubscriptionId -> MaybeT m (Subscription' UserId Billable)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30211"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":279,"ins":{"up_context":[{"change":5,"pos":4655}],"down_context":[{"change":5,"pos":1594}],"flag":"BLOCK","start":67065,"end":67376,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4655},"to":{"change":4,"start":30213,"end":30310},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":29670},"to":{"change":5,"start":6032,"end":6083},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":30310},"to":{"change":5,"start":6032,"end":6083},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6032},"to":{"change":5,"start":6032,"end":6083},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"storePaymentRequest ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67087"}},{"Add":{"text":" (MonadDB m) => PaymentRequest c -> m PaymentRequestId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67143"}},{"Add":{"text":"storePaymentRequest = liftdb . StorePaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67194"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67195"}},{"Add":{"text":"findPaymentRequestByKey ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67222"}},{"Add":{"text":" (MonadDB m) => PaymentKey -> MaybeT m (PaymentRequestId, SomePaymentRequestDetail)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67307"}},{"Add":{"text":"findPaymentRequestByKey = MaybeT . liftdb . FindPaymentRequestByKey","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67375"}}],"del_contents":[{"Del":{"text":"findPaymentRequests ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30235"}},{"Del":{"text":" (MonadDB m) => SubscriptionId -> m [(PaymentRequestId, PaymentRequest)]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30309"}},{"Del":{"text":"findPaymentRequests = liftdb . FindPaymentRequests","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:6082"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":287,"ins":{"up_context":[{"change":5,"pos":1595}],"down_context":[{"change":5,"pos":25871}],"flag":"BLOCK","start":67377,"end":67540,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1595},"to":{"change":4,"start":30311,"end":30408},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":29768},"to":{"change":5,"start":25813,"end":25871},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":30408},"to":{"change":5,"start":25813,"end":25871},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25813},"to":{"change":5,"start":25813,"end":25871},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findPaymentRequestById ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67402"}},{"Add":{"text":" (MonadDB m) => PaymentRequestId -> MaybeT m SomePaymentRequestDetail","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67473"}},{"Add":{"text":"findPaymentRequestById = MaybeT . liftdb . FindPaymentRequestById","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67539"}}],"del_contents":[{"Del":{"text":"findPaymentRequest ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30332"}},{"Del":{"text":" (MonadDB m) => PaymentKey -> MaybeT m (PaymentRequestId, PaymentRequest)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30407"}},{"Del":{"text":"findPaymentRequest = MaybeT . liftdb . FindPaymentRequest","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:25870"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":291,"ins":{"up_context":[{"change":5,"pos":25872}],"down_context":[{"change":5,"pos":1117}],"flag":"BLOCK","start":67541,"end":67735,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25872},"to":{"change":4,"start":30409,"end":30494},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":29854},"to":{"change":5,"start":25955,"end":26017},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":30494},"to":{"change":5,"start":25955,"end":26017},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25955},"to":{"change":5,"start":25955,"end":26017},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findSubscriptionPaymentRequests ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67575"}},{"Add":{"text":" (MonadDB m) => SubscriptionId -> m [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67659"}},{"Add":{"text":"findSubscriptionPaymentRequests = liftdb . FindSubscriptionPaymentRequests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67734"}}],"del_contents":[{"Del":{"text":"findPaymentRequestId ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30432"}},{"Del":{"text":" (MonadDB m) => PaymentRequestId -> MaybeT m PaymentRequest","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:30493"}},{"Del":{"text":"findPaymentRequestId = MaybeT . liftdb . FindPaymentRequestId","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26016"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":297,"ins":{"up_context":[{"change":5,"pos":2213}],"down_context":[{"change":5,"pos":2332}],"flag":"BLOCK","start":67736,"end":67925,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2213},"to":{"change":5,"start":2213,"end":2332},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findSubscriptionUnpaidRequests :: (MonadDB m) => SubscriptionId -> m [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67851"}},{"Add":{"text":"findSubscriptionUnpaidRequests = liftdb . FindSubscriptionUnpaidRequests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:67924"}}],"del_contents":[{"Del":{"text":"findUnpaidRequests :: (MonadDB m) => SubscriptionId -> m [BillDetail]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:2282"}},{"Del":{"text":"findUnpaidRequests = liftdb . FindUnpaidRequests","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:2331"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":300,"ins":{"up_context":[{"change":5,"pos":2333}],"down_context":[{"change":5,"pos":4910}],"flag":"BLOCK","start":67926,"end":68111,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2333},"to":{"change":5,"start":26018,"end":26165},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findPayment :: (MonadDB m) => Currency a c -> PaymentRequestId -> MaybeT m (Payment c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68012"}},{"Add":{"text":"findPayment currency prid = MaybeT $ (fmap snd . headMay) <$> liftdb (FindPayments currency prid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68110"}}],"del_contents":[{"Del":{"text":"findPayment :: (MonadDB m) => PaymentRequestId -> MaybeT m Payment","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26084"}},{"Del":{"text":"findPayment prid = MaybeT $ (fmap snd . headMay) <$> liftdb (FindPayments prid)","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26164"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":305,"ins":{"up_context":[{"change":5,"pos":1306}],"down_context":[{"change":5,"pos":671}],"flag":"BLOCK","start":68112,"end":68171,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1306},"to":{"change":5,"start":9596,"end":9651},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"createAuction :: (MonadDB m) => A.Auction -> m A.AuctionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68170"}}],"del_contents":[{"Del":{"text":"createAuction :: (MonadDB m) => Auction -> m AuctionId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:9650"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":309,"ins":{"up_context":[{"change":5,"pos":767}],"down_context":[{"change":5,"pos":841}],"flag":"BLOCK","start":68172,"end":68246,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":767},"to":{"change":5,"start":26166,"end":26236},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findAuction :: (MonadDB m) => A.AuctionId -> UserId -> MaybeT m A.Auction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68245"}}],"del_contents":[{"Del":{"text":"findAuction :: (MonadDB m) => AuctionId -> UserId -> MaybeT m Auction","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26235"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":317,"ins":{"up_context":[{"change":5,"pos":293}],"down_context":[{"change":5,"pos":864}],"flag":"BLOCK","start":68247,"end":68315,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":293},"to":{"change":5,"start":9755,"end":9819},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"findAuction' :: (MonadDB m) => A.AuctionId -> UserId -> m A.Auction","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68314"}}],"del_contents":[{"Del":{"text":"findAuction' :: (MonadDB m) => AuctionId -> UserId -> m Auction","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:9818"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":328,"ins":{"up_context":[{"change":5,"pos":22}],"down_context":[{"change":5,"pos":888}],"flag":"BLOCK","start":68316,"end":68388,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22},"to":{"change":5,"start":9906,"end":9972},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":"createBid :: (MonadDB m) => A.AuctionId -> UserId -> A.Bid -> m A.BidId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68387"}}],"del_contents":[{"Del":{"text":"createBid :: (MonadDB m) => AuctionId -> UserId -> Bid -> m BidId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:9971"}}]}},{"Replacement":{"inode":{"change":5,"pos":4936},"path":"lib/Aftok/Database.hs","line":333,"ins":{"up_context":[{"change":5,"pos":30228}],"down_context":[{"change":5,"pos":30278}],"flag":"BLOCK","start":68389,"end":68443,"inode":{"change":5,"pos":4936}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":30228},"to":{"change":5,"start":30228,"end":30278},"introduced_by":5}],"inode":{"change":5,"pos":4936}},"ins_contents":[{"Add":{"text":" if view A.bidTime bid > view A.auctionEnd auc","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68442"}}],"del_contents":[{"Del":{"text":" if view bidTime bid > view auctionEnd auc","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:30277"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":11,"ins":{"up_context":[{"change":5,"pos":273}],"down_context":[{"change":4,"pos":31602}],"flag":"BLOCK","start":68445,"end":68481,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":273},"to":{"change":4,"start":31576,"end":31602},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Auction as A","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68480"}}],"del_contents":[{"Del":{"text":"import Aftok.Auction as A","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:31601"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":13,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":31638}],"down_context":[{"change":4,"pos":31638}],"flag":"BLOCK","start":68482,"end":68533,"inode":{"change":5,"pos":19}}},"contents":[{"Add":{"text":"import Aftok.Currency (Amount (..), Currency (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68532"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":15,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":31668}],"down_context":[{"change":4,"pos":31668}],"flag":"BLOCK","start":68534,"end":68573,"inode":{"change":5,"pos":19}}},"contents":[{"Add":{"text":"import Aftok.Currency.Zcash (_Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68572"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":17,"ins":{"up_context":[{"change":4,"pos":31690}],"down_context":[{"change":4,"pos":31738}],"flag":"BLOCK","start":68574,"end":68673,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":31690},"to":{"change":4,"start":31690,"end":31738},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68601"}},{"Add":{"text":" ( PaymentId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68616"}},{"Add":{"text":" _PaymentId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68632"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68636"}},{"Add":{"text":"import qualified Aftok.Project as P","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68672"}}],"del_contents":[{"Del":{"text":"import Aftok.Payments","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:31711"}},{"Del":{"text":"import Aftok.Project as P","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:31737"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":24,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":31778},"to":{"change":4,"start":31778,"end":31811},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":"import Aftok.Util (traverseKeys)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:31810"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":26,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":31851},"to":{"change":4,"start":31851,"end":31867},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":" fromMaybeM,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:31866"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":32,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":32038},"to":{"change":4,"start":32038,"end":32085},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":"import qualified Data.ByteString.Base64 as B64","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:32084"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":37,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":32238},"to":{"change":4,"start":32238,"end":32317},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":"import Data.ProtocolBuffers (encodeMessage)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:32281"}},{"Del":{"text":"import Data.Serialize.Put (runPut)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:32316"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":45,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":32553},"to":{"change":4,"start":32553,"end":32587},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":" addrFromJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:32570"}},{"Del":{"text":" addrToJSON,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:32586"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":142,"ins":{"up_context":[{"change":5,"pos":1694}],"down_context":[{"change":4,"pos":33657}],"flag":"BLOCK","start":68674,"end":68708,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":1694},"to":{"change":5,"start":5266,"end":5298},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":486},"to":{"change":5,"start":5266,"end":5298},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"projectJSON :: P.Project -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68707"}}],"del_contents":[{"Del":{"text":"projectJSON :: Project -> Value","pos":"A6HKMINBNGQLLX4QJMYWKQ4JAEHVJ4HIRVDKPPDI3FJUO2AAB7OQC:5297"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":146,"ins":{"up_context":[{"change":4,"pos":33688}],"down_context":[{"change":4,"pos":33782}],"flag":"BLOCK","start":68709,"end":68807,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":33688},"to":{"change":4,"start":33688,"end":33782},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" [ \"projectName\" .= (p ^. P.projectName),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68755"}},{"Add":{"text":" \"inceptionDate\" .= (p ^. P.inceptionDate),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68806"}}],"del_contents":[{"Del":{"text":" [ \"projectName\" .= (p ^. projectName),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:33732"}},{"Del":{"text":" \"inceptionDate\" .= (p ^. inceptionDate),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:33781"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":151,"ins":{"up_context":[{"change":5,"pos":26516}],"down_context":[{"change":5,"pos":4498}],"flag":"BLOCK","start":68808,"end":68858,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":26516},"to":{"change":5,"start":26516,"end":26564},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"qdbProjectJSON :: (ProjectId, P.Project) -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68857"}}],"del_contents":[{"Del":{"text":"qdbProjectJSON :: (ProjectId, Project) -> Value","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26563"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":154,"ins":{"up_context":[{"change":5,"pos":539}],"down_context":[{"change":5,"pos":481}],"flag":"BLOCK","start":68859,"end":68945,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":539},"to":{"change":5,"start":366,"end":402},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":402},"to":{"change":5,"start":1898,"end":1944},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"auctionIdJSON :: A.AuctionId -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68896"}},{"Add":{"text":"auctionIdJSON = idJSON \"auctionId\" A._AuctionId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68944"}}],"del_contents":[{"Del":{"text":"auctionIdJSON :: AuctionId -> Value","pos":"ASF3UPJLCX7KIUCNJD5KAXSPDXCUEJHLL4HBRTRUBPCW73IXOCWQC:401"}},{"Del":{"text":"auctionIdJSON = idJSON \"auctionId\" _AuctionId","pos":"EW2XN7KUMCAQNVFJJ5YTAVDZCPHNWDOEDMRFBUGLY6IE2HKNNX5AC:1943"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":157,"ins":{"up_context":[{"change":5,"pos":482}],"down_context":[{"change":4,"pos":33843}],"flag":"BLOCK","start":68946,"end":68980,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":482},"to":{"change":5,"start":539,"end":571},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":539},"to":{"change":5,"start":539,"end":571},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"auctionJSON :: A.Auction -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:68979"}}],"del_contents":[{"Del":{"text":"auctionJSON :: Auction -> Value","pos":"Z3MK2PJ5U222DXRS22WCDHVPZ7HVAR3HOCUNXIGX6VMEPBQDF6PQC:570"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":163,"ins":{"up_context":[{"change":4,"pos":33993}],"down_context":[{"change":4,"pos":34049}],"flag":"BLOCK","start":68981,"end":69040,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":33993},"to":{"change":4,"start":33993,"end":34049},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" \"raiseAmount\" .= (x ^. (A.raiseAmount . _Satoshi))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69039"}}],"del_contents":[{"Del":{"text":" \"raiseAmount\" .= (x ^. (raiseAmount . satoshi))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34048"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":166,"ins":{"up_context":[{"change":5,"pos":484}],"down_context":[{"change":5,"pos":21865}],"flag":"BLOCK","start":69041,"end":69127,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":484},"to":{"change":5,"start":484,"end":512},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":512},"to":{"change":5,"start":33824,"end":33878},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"bidIdJSON :: A.BidId -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69070"}},{"Add":{"text":"bidIdJSON pid = v1 $ obj [\"bidId\" .= (pid ^. A._BidId)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69126"}}],"del_contents":[{"Del":{"text":"bidIdJSON :: BidId -> Value","pos":"ASF3UPJLCX7KIUCNJD5KAXSPDXCUEJHLL4HBRTRUBPCW73IXOCWQC:511"}},{"Del":{"text":"bidIdJSON pid = v1 $ obj [\"bidId\" .= (pid ^. _BidId)]","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:33877"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":173,"ins":{"up_context":[{"change":5,"pos":2561}],"down_context":[{"change":5,"pos":34059}],"flag":"BLOCK","start":69128,"end":69302,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2561},"to":{"change":5,"start":21885,"end":21955},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":21955},"to":{"change":4,"start":34058,"end":34256},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":34058},"to":{"change":5,"start":22152,"end":22188},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":34256},"to":{"change":5,"start":22152,"end":22188},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22152},"to":{"change":5,"start":22152,"end":22188},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"creditToJSON :: CreditTo -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69161"}},{"Add":{"text":"creditToJSON (CreditToAccount accountId) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69204"}},{"Add":{"text":" v2 $ obj [\"creditToAccount\" .= idValue _AccountId accountId]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69267"}},{"Add":{"text":"creditToJSON (CreditToUser uid) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69301"}}],"del_contents":[{"Del":{"text":"creditToJSON :: NetworkMode -> CreditTo (NetworkId, Address) -> Value","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:21954"}},{"Del":{"text":"creditToJSON nmode (CreditToCurrency (netId, addr)) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34111"}},{"Del":{"text":" v2 $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34118"}},{"Del":{"text":" obj","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34126"}},{"Del":{"text":" [ \"creditToAddress\" .= addrToJSON (toNetwork nmode netId) addr,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34196"}},{"Del":{"text":" \"creditToNetwork\" .= renderNetworkId netId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34247"}},{"Del":{"text":" ]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34255"}},{"Del":{"text":"creditToJSON _ (CreditToUser uid) =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22187"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":178,"ins":{"up_context":[{"change":5,"pos":34110}],"down_context":[{"change":5,"pos":34111}],"flag":"BLOCK","start":69303,"end":69340,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":34110},"to":{"change":5,"start":22244,"end":22283},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22244},"to":{"change":5,"start":22244,"end":22283},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"creditToJSON (CreditToProject pid) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69339"}}],"del_contents":[{"Del":{"text":"creditToJSON _ (CreditToProject pid) =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22282"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":181,"ins":{"up_context":[{"change":5,"pos":22338}],"down_context":[{"change":4,"pos":34257}],"flag":"BLOCK","start":69341,"end":69463,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22338},"to":{"change":5,"start":22338,"end":22551},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"parseCreditTo :: Value -> Parser CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69382"}},{"Add":{"text":"parseCreditTo = unversion \"CreditTo\" $ \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69427"}},{"Add":{"text":" (Version 2 0) -> parseCreditToV2","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69462"}}],"del_contents":[{"Del":{"text":"parseCreditTo :: NetworkMode -> Value -> Parser (CreditTo (NetworkId, Address))","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22417"}},{"Del":{"text":"parseCreditTo nmode = unversion \"CreditTo\" $ \\case","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22468"}},{"Del":{"text":" (Version 1 0) -> parseCreditToV1 nmode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22509"}},{"Del":{"text":" (Version 2 0) -> parseCreditToV2 nmode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:22550"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":187,"ins":{"up_context":[{"change":4,"pos":34315}],"down_context":[{"change":4,"pos":34426}],"flag":"BLOCK","start":69464,"end":69534,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":34315},"to":{"change":4,"start":34315,"end":34426},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" NetworkMode -> Text -> Parser Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69503"}},{"Add":{"text":"parseBtcAddr nmode addrText =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69533"}}],"del_contents":[{"Del":{"text":" NetworkMode -> NetworkId -> Text -> Parser (CreditTo (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34391"}},{"Del":{"text":"parseBtcAddr nmode net addrText =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34425"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":190,"ins":{"up_context":[{"change":4,"pos":34434}],"down_context":[{"change":5,"pos":22927}],"flag":"BLOCK","start":69535,"end":69685,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":34434},"to":{"change":4,"start":34434,"end":34659},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" (fail . T.unpack $ \"Address \" <> addrText <> \" cannot be parsed as a BTC network address.\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69630"}},{"Add":{"text":" pure","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69639"}},{"Add":{"text":" (textToAddr (getNetwork nmode) addrText)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69684"}}],"del_contents":[{"Del":{"text":" ( fail","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34444"}},{"Del":{"text":" . T.unpack","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34463"}},{"Del":{"text":" $ \"Address \"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34484"}},{"Del":{"text":" <> addrText","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34506"}},{"Del":{"text":" <> \" cannot be parsed as a BTC network address.\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34565"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34571"}},{"Del":{"text":" (pure . CreditToCurrency . (net,))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34610"}},{"Del":{"text":" (textToAddr (toNetwork nmode net) addrText)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34658"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":194,"ins":{"up_context":[{"change":5,"pos":22928}],"down_context":[{"change":4,"pos":35208}],"flag":"BLOCK","start":69686,"end":69857,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":22928},"to":{"change":4,"start":34660,"end":34745},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":34549},"to":{"change":5,"start":23017,"end":23091},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":34745},"to":{"change":5,"start":23017,"end":23091},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23017},"to":{"change":5,"start":23017,"end":23091},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23091},"to":{"change":4,"start":34746,"end":34831},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":34635},"to":{"change":5,"start":23174,"end":23200},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":34831},"to":{"change":5,"start":23174,"end":23200},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23174},"to":{"change":5,"start":23174,"end":23200},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":23200},"to":{"change":4,"start":34832,"end":35208},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"parseCreditToV2 :: Object -> Parser CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69730"}},{"Add":{"text":"parseCreditToV2 o =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69750"}},{"Add":{"text":" let parseCreditToAcct = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69779"}},{"Add":{"text":" fmap CreditToAccount . parseId _AccountId =<< o .: \"creditToAccount\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69856"}}],"del_contents":[{"Del":{"text":"parseCreditToV1 ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34678"}},{"Del":{"text":" NetworkMode -> Object -> Parser (CreditTo (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34744"}},{"Del":{"text":"parseCreditToV1 nmode x = do","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:23045"}},{"Del":{"text":" parseBtcAddr nmode BTC =<< x .: \"btcAddr\"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:23089"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:23090"}},{"Del":{"text":"parseCreditToV2 ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34764"}},{"Del":{"text":" NetworkMode -> Object -> Parser (CreditTo (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34830"}},{"Del":{"text":"parseCreditToV2 nmode o =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:23199"}},{"Del":{"text":" let parseCreditToAddr = do","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34860"}},{"Del":{"text":" netName <- o .: \"creditToNetwork\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34902"}},{"Del":{"text":" net <-","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34917"}},{"Del":{"text":" fromMaybeM","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:34938"}},{"Del":{"text":" (fail . T.unpack $ \"Currency network \" <> netName <> \" not recognized.\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35023"}},{"Del":{"text":" (parseNetworkId netName)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35060"}},{"Del":{"text":" addrValue <- o .: \"creditToAddress\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35104"}},{"Del":{"text":" CreditToCurrency","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35129"}},{"Del":{"text":" . (net,)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35148"}},{"Del":{"text":" <$> addrFromJSON (toNetwork nmode net) addrValue","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35207"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":204,"ins":{"up_context":[{"change":4,"pos":35502}],"down_context":[{"change":4,"pos":35526}],"flag":"BLOCK","start":69858,"end":69882,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":35502},"to":{"change":4,"start":35502,"end":35526},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" in parseCreditToAcct","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69881"}}],"del_contents":[{"Del":{"text":" in parseCreditToAddr","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35525"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":213,"ins":{"up_context":[{"change":5,"pos":581}],"down_context":[{"change":4,"pos":35611}],"flag":"BLOCK","start":69883,"end":69951,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":581},"to":{"change":5,"start":35378,"end":35478},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"payoutsJSON :: FractionalPayouts -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69924"}},{"Add":{"text":"payoutsJSON (Payouts m) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:69950"}}],"del_contents":[{"Del":{"text":"payoutsJSON :: NetworkMode -> Payouts (NetworkId, Address) -> Value","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:35445"}},{"Del":{"text":"payoutsJSON nmode (Payouts m) =","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:35477"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":216,"ins":{"up_context":[{"change":4,"pos":35618}],"down_context":[{"change":4,"pos":35691}],"flag":"BLOCK","start":69952,"end":70004,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":35618},"to":{"change":4,"start":35618,"end":35691},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" let payoutsRec :: (CreditTo, Rational) -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70003"}}],"del_contents":[{"Del":{"text":" let payoutsRec :: (CreditTo (NetworkId, Address), Rational) -> Value","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35690"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":218,"ins":{"up_context":[{"change":4,"pos":35719}],"down_context":[{"change":4,"pos":35793}],"flag":"BLOCK","start":70005,"end":70127,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":35719},"to":{"change":4,"start":35719,"end":35793},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" object [\"creditTo\" .= creditToJSON c, \"payoutRatio\" .= r, \"payoutPercentage\" .= (fromRational @Double r * 100)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70126"}}],"del_contents":[{"Del":{"text":" object [\"creditTo\" .= creditToJSON nmode c, \"payoutRatio\" .= r]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35792"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":221,"ins":{"up_context":[{"change":5,"pos":24498}],"down_context":[{"change":4,"pos":35986}],"flag":"BLOCK","start":70128,"end":70225,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24498},"to":{"change":4,"start":35853,"end":35986},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"parsePayoutsJSON :: Value -> Parser FractionalPayouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70181"}},{"Add":{"text":"parsePayoutsJSON = unversion \"Payouts\" $ p","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70224"}}],"del_contents":[{"Del":{"text":"parsePayoutsJSON ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35872"}},{"Del":{"text":" NetworkMode -> Value -> Parser (Payouts (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35936"}},{"Del":{"text":"parsePayoutsJSON nmode = unversion \"Payouts\" $ p","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:35985"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":224,"ins":{"up_context":[{"change":4,"pos":35994}],"down_context":[{"change":4,"pos":36196}],"flag":"BLOCK","start":70226,"end":70281,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":35994},"to":{"change":4,"start":35994,"end":36196},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" p :: Version -> Object -> Parser FractionalPayouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70280"}}],"del_contents":[{"Del":{"text":" p :: Version -> Object -> Parser (Payouts (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36061"}},{"Del":{"text":" p (Version 1 _) val =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36087"}},{"Del":{"text":" Payouts","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36101"}},{"Del":{"text":" <$> join","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36118"}},{"Del":{"text":" (traverseKeys (parseBtcAddr nmode BTC) <$> parseJSON (Object val))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36195"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":228,"ins":{"up_context":[{"change":5,"pos":35970}],"down_context":[{"change":5,"pos":36034}],"flag":"BLOCK","start":70282,"end":70340,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":35970},"to":{"change":5,"start":35970,"end":36034},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" <$> (parseCreditToV2 =<< (x .: \"creditTo\"))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70339"}}],"del_contents":[{"Del":{"text":" <$> (parseCreditToV2 nmode =<< (x .: \"creditTo\"))","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:36033"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":239,"ins":{"up_context":[{"change":5,"pos":24820}],"down_context":[{"change":4,"pos":36452}],"flag":"BLOCK","start":70341,"end":70410,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24820},"to":{"change":5,"start":24820,"end":24892},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":24892},"to":{"change":4,"start":36413,"end":36452},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"workIndexJSON :: WorkIndex -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70376"}},{"Add":{"text":"workIndexJSON (WorkIndex widx) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70409"}}],"del_contents":[{"Del":{"text":"workIndexJSON :: NetworkMode -> WorkIndex (NetworkId, Address) -> Value","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:24891"}},{"Del":{"text":"workIndexJSON nmode (WorkIndex widx) =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36451"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":244,"ins":{"up_context":[{"change":4,"pos":36522}],"down_context":[{"change":4,"pos":36597}],"flag":"BLOCK","start":70411,"end":70465,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":36522},"to":{"change":4,"start":36522,"end":36597},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" widxRec :: (CreditTo, NonEmpty Interval) -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70464"}}],"del_contents":[{"Del":{"text":" widxRec :: (CreditTo (NetworkId, Address), NonEmpty Interval) -> Value","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36596"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":247,"ins":{"up_context":[{"change":4,"pos":36631}],"down_context":[{"change":4,"pos":36677}],"flag":"BLOCK","start":70466,"end":70506,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":36631},"to":{"change":4,"start":36631,"end":36677},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" [ \"creditTo\" .= creditToJSON c,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70505"}}],"del_contents":[{"Del":{"text":" [ \"creditTo\" .= creditToJSON nmode c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36676"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":258,"ins":{"up_context":[{"change":5,"pos":255}],"down_context":[{"change":5,"pos":4909}],"flag":"BLOCK","start":70507,"end":70588,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":255},"to":{"change":5,"start":25082,"end":25152},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25152},"to":{"change":5,"start":4850,"end":4909},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"logEntryJSON :: LogEntry -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70540"}},{"Add":{"text":"logEntryJSON le = v2 $ obj (logEntryFields le)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70587"}}],"del_contents":[{"Del":{"text":"logEntryJSON :: NetworkMode -> LogEntry (NetworkId, Address) -> Value","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:25151"}},{"Del":{"text":"logEntryJSON nmode le = v2 $ obj (logEntryFields nmode le)","pos":"ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC:4908"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":261,"ins":{"up_context":[{"change":5,"pos":4910}],"down_context":[{"change":4,"pos":36783}],"flag":"BLOCK","start":70589,"end":70695,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4910},"to":{"change":5,"start":4910,"end":5024},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5024},"to":{"change":4,"start":36743,"end":36783},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"logEntryFields :: LogEntry -> [Pair]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70625"}},{"Add":{"text":"logEntryFields (LogEntry c ev m) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70660"}},{"Add":{"text":" [ \"creditTo\" .= creditToJSON c,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70694"}}],"del_contents":[{"Del":{"text":"logEntryFields :: NetworkMode -> LogEntry (NetworkId, Address) -> [Pair]","pos":"ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC:4982"}},{"Del":{"text":"logEntryFields nmode (LogEntry c ev m) =","pos":"ZIG57EE6RB22JGB3CT33EN2HVYCHCXBT5GROBTBMBLEMDTGQOOBQC:5023"}},{"Del":{"text":" [ \"creditTo\" .= creditToJSON nmode c,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:36782"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":271,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":26624}],"down_context":[{"change":5,"pos":26624}],"flag":"BLOCK","start":70696,"end":70883,"inode":{"change":5,"pos":19}}},"contents":[{"Add":{"text":"amountJSON :: Amount -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70725"}},{"Add":{"text":"amountJSON (Amount currency value) = case currency of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70779"}},{"Add":{"text":" BTC -> object [\"satoshi\" .= (value ^. _Satoshi)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70830"}},{"Add":{"text":" ZEC -> object [\"zatoshi\" .= (value ^. _Zatoshi)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70881"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70882"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":279,"ins":{"up_context":[{"change":5,"pos":1569}],"down_context":[{"change":5,"pos":2524}],"flag":"BLOCK","start":70884,"end":70927,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1569},"to":{"change":5,"start":1569,"end":1605},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"billableJSON :: B.Billable Amount -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70926"}}],"del_contents":[{"Del":{"text":"billableJSON :: B.Billable -> Value","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:1604"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":282,"ins":{"up_context":[{"change":5,"pos":2562}],"down_context":[{"change":5,"pos":2612}],"flag":"BLOCK","start":70928,"end":70985,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2562},"to":{"change":5,"start":2562,"end":2612},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"billableKV :: (KeyValue kv) => B.Billable Amount -> [kv]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:70984"}}],"del_contents":[{"Del":{"text":"billableKV :: (KeyValue kv) => B.Billable -> [kv]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:2611"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":287,"ins":{"up_context":[{"change":4,"pos":36965}],"down_context":[{"change":4,"pos":37067}],"flag":"BLOCK","start":70986,"end":71099,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":36965},"to":{"change":4,"start":36965,"end":37067},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" \"recurrence\" .= (b ^. B.recurrence . to recurrenceJSON'),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71047"}},{"Add":{"text":" \"amount\" .= (b ^. (B.amount . to amountJSON)),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71098"}}],"del_contents":[{"Del":{"text":" \"recurrence\" .= recurrenceJSON' (b ^. B.recurrence),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37021"}},{"Del":{"text":" \"amount\" .= (b ^. (B.amount . satoshi)),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37066"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":290,"ins":{"up_context":[{"change":4,"pos":37110}],"down_context":[{"change":5,"pos":2993}],"flag":"BLOCK","start":71100,"end":71180,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":37110},"to":{"change":4,"start":37110,"end":37191},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" \"requestExpiryPeriod\" .= (b ^. B.requestExpiryPeriod . to Clock.toSeconds')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71179"}}],"del_contents":[{"Del":{"text":" \"requestExpiryPeriod\" .= (Clock.toSeconds' <$> (b ^. B.requestExpiryPeriod))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37190"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":293,"ins":{"up_context":[{"change":5,"pos":26717}],"down_context":[{"change":5,"pos":4603}],"flag":"BLOCK","start":71181,"end":71243,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":26717},"to":{"change":5,"start":26717,"end":26772},"introduced_by":5}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"qdbBillableJSON :: (B.BillableId, B.Billable Amount) -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71242"}}],"del_contents":[{"Del":{"text":"qdbBillableJSON :: (B.BillableId, B.Billable) -> Value","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:26771"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":327,"ins":{"up_context":[{"change":5,"pos":26949}],"down_context":[{"change":5,"pos":26950}],"flag":"BLOCK","start":71244,"end":71680,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":3562},"to":{"change":5,"start":630,"end":676},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":26949},"to":{"change":5,"start":630,"end":676},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":630},"to":{"change":5,"start":630,"end":676},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":676},"to":{"change":5,"start":3563,"end":3694},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3694},"to":{"change":4,"start":37770,"end":38065},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":770},"to":{"change":5,"start":4007,"end":4011},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":38065},"to":{"change":5,"start":4007,"end":4011},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4007},"to":{"change":5,"start":4007,"end":4011},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4011},"to":{"change":4,"start":38066,"end":38167},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":2890},"to":{"change":5,"start":4011,"end":4053},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3342},"to":{"change":5,"start":4011,"end":4053},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":37661},"to":{"change":5,"start":4011,"end":4053},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":38167},"to":{"change":5,"start":4011,"end":4053},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4011},"to":{"change":5,"start":4011,"end":4053},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4053},"to":{"change":5,"start":37662,"end":37737},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4131},"to":{"change":5,"start":975,"end":976},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":37737},"to":{"change":5,"start":975,"end":976},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":975},"to":{"change":5,"start":975,"end":976},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":976},"to":{"change":5,"start":4132,"end":4171},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4171},"to":{"change":4,"start":38168,"end":38380},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":"-- paymentRequestDetailsJSON :: [PaymentRequestDetail Amount] -> Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71314"}},{"Add":{"text":"-- paymentRequestDetailsJSON r = v1 $ obj [\"payment_requests\" .= fmap paymentRequestDetailJSON r]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71412"}},{"Add":{"text":"--","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71415"}},{"Add":{"text":"-- paymentRequestDetailJSON :: PaymentRequestDetail Amount -> Object","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71484"}},{"Add":{"text":"-- paymentRequestDetailJSON r = obj $ concat","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71529"}},{"Add":{"text":"-- [ [\"payment_request_id\" .= view () r]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71572"}},{"Add":{"text":"-- , paymentRequestKV $ view _2 r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71608"}},{"Add":{"text":"-- , subscriptionKV $ view _3 r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71642"}},{"Add":{"text":"-- , billableKV $ view _4 r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71672"}},{"Add":{"text":"-- ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71679"}}],"del_contents":[{"Del":{"text":"paymentRequestJSON :: PaymentRequest -> Value","pos":"WAIX6AGNDVJOKTWZ7OP7QOYSJHAJSX5EOWXZHOAO2IG6ALWUCJ6QC:675"}},{"Del":{"text":"paymentRequestJSON = v1 . obj . paymentRequestKV","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:3611"}},{"Del":{"text":"","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:3612"}},{"Del":{"text":"paymentRequestKV :: (KeyValue kv) => PaymentRequest -> [kv]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:3672"}},{"Del":{"text":"paymentRequestKV r =","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:3693"}},{"Del":{"text":" [ \"subscription_id\" .= idValue (subscription . B._SubscriptionId) r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37840"}},{"Del":{"text":" \"payment_request_protobuf_64\" .= view prBytes r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37893"}},{"Del":{"text":" \"url_key\" .= view (paymentKey . _PaymentKey) r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:37945"}},{"Del":{"text":" \"payment_request_time\" .= view paymentRequestTime r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38002"}},{"Del":{"text":" \"billing_date\" .= view (billingDate . to showGregorian) r","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38064"}},{"Del":{"text":" ]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:4010"}},{"Del":{"text":" where","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38073"}},{"Del":{"text":" prBytes =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38087"}},{"Del":{"text":" paymentRequest . to (T.decodeUtf8 . B64.encode . runPut . encodeMessage)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38166"}},{"Del":{"text":"","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:4011"}},{"Del":{"text":"billDetailsJSON :: [BillDetail] -> Value","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:4052"}},{"Del":{"text":"billDetailsJSON r = v1 $ obj [\"payment_requests\" .= fmap billDetailJSON r]","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:37736"}},{"Del":{"text":"","pos":"WAIX6AGNDVJOKTWZ7OP7QOYSJHAJSX5EOWXZHOAO2IG6ALWUCJ6QC:975"}},{"Del":{"text":"billDetailJSON :: BillDetail -> Object","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:4170"}},{"Del":{"text":"billDetailJSON r =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38186"}},{"Del":{"text":" obj $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38194"}},{"Del":{"text":" concat","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38205"}},{"Del":{"text":" [ [\"payment_request_id\" .= view (_1 . _PaymentKey) r],","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38266"}},{"Del":{"text":" paymentRequestKV $ view _2 r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38304"}},{"Del":{"text":" subscriptionKV $ view _3 r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38340"}},{"Del":{"text":" billableKV $ view _4 r","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38371"}},{"Del":{"text":" ]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38379"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":341,"atom":{"EdgeMap":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":4378},"to":{"change":5,"start":976,"end":1008},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":976},"to":{"change":5,"start":976,"end":1008},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1008},"to":{"change":4,"start":38381,"end":38691},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3110},"to":{"change":5,"start":2430,"end":2431},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3428},"to":{"change":5,"start":2430,"end":2431},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":38203},"to":{"change":5,"start":2430,"end":2431},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":38691},"to":{"change":5,"start":2430,"end":2431},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2430},"to":{"change":5,"start":2430,"end":2431},"introduced_by":5}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":"paymentJSON :: Payment -> Value","pos":"WAIX6AGNDVJOKTWZ7OP7QOYSJHAJSX5EOWXZHOAO2IG6ALWUCJ6QC:1007"}},{"Del":{"text":"paymentJSON r =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38396"}},{"Del":{"text":" v1 $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38403"}},{"Del":{"text":" obj","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38411"}},{"Del":{"text":" [ \"payment_request_id\" .= idValue (request . _PaymentRequestId) r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38484"}},{"Del":{"text":" \"payment_protobuf_64\" .= view paymentBytes r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38538"}},{"Del":{"text":" \"payment_date\" .= (r ^. paymentDate)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38583"}},{"Del":{"text":" ]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38591"}},{"Del":{"text":" where","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38599"}},{"Del":{"text":" paymentBytes =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38618"}},{"Del":{"text":" payment . to (T.decodeUtf8 . B64.encode . runPut . encodeMessage)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38690"}},{"Del":{"text":"","pos":"O227CEAV7BTKSE3SSC7XHC5IWEBXZL2AOOKJMBMOOFNTLINBLQMAC:2430"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":354,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":38876},"to":{"change":4,"start":38876,"end":38893},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":" NetworkMode ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38892"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":356,"ins":{"up_context":[{"change":4,"pos":38917}],"down_context":[{"change":4,"pos":39025}],"flag":"BLOCK","start":71681,"end":71760,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":38917},"to":{"change":4,"start":38917,"end":39025},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" Parser EventAmendment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71704"}},{"Add":{"text":"parseEventAmendment t = unversion \"EventAmendment\" $ p","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71759"}}],"del_contents":[{"Del":{"text":" Parser (EventAmendment (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:38963"}},{"Del":{"text":"parseEventAmendment nmode t = unversion \"EventAmendment\" $ p","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39024"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":359,"ins":{"up_context":[{"change":4,"pos":39033}],"down_context":[{"change":4,"pos":39137}],"flag":"BLOCK","start":71761,"end":71807,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":39033},"to":{"change":4,"start":39033,"end":39137},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" p (Version 2 0) = parseEventAmendmentV2 t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71806"}}],"del_contents":[{"Del":{"text":" p (Version 1 _) = parseEventAmendmentV1 nmode t","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39084"}},{"Del":{"text":" p (Version 2 0) = parseEventAmendmentV2 nmode t","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39136"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":362,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1957},"to":{"change":4,"start":39182,"end":39296},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":39296},"to":{"change":5,"start":25818,"end":25852},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25818},"to":{"change":5,"start":25818,"end":25852},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":25852},"to":{"change":4,"start":39297,"end":39697},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":1362},"to":{"change":5,"start":2512,"end":2513},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4328},"to":{"change":5,"start":2512,"end":2513},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":38771},"to":{"change":5,"start":2512,"end":2513},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":39697},"to":{"change":5,"start":2512,"end":2513},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2512},"to":{"change":5,"start":2512,"end":2513},"introduced_by":5}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":"parseEventAmendmentV1 ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39206"}},{"Del":{"text":" NetworkMode ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39223"}},{"Del":{"text":" ModTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39236"}},{"Del":{"text":" Object ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39248"}},{"Del":{"text":" Parser (EventAmendment (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39295"}},{"Del":{"text":"parseEventAmendmentV1 nmode t o =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:25851"}},{"Del":{"text":" let parseA :: Text -> Parser (EventAmendment (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39365"}},{"Del":{"text":" parseA \"timeChange\" = TimeChange t <$> o .: \"eventTime\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39427"}},{"Del":{"text":" parseA \"addrChange\" = CreditToChange t <$> parseCreditToV1 nmode o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39500"}},{"Del":{"text":" parseA \"metadataChange\" = MetadataChange t <$> o .: \"eventMeta\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39570"}},{"Del":{"text":" parseA tid =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39589"}},{"Del":{"text":" fail . T.unpack $ \"Amendment type \" <> tid <> \" not recognized.\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39662"}},{"Del":{"text":" in o .: \"amendment\" >>= parseA","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39696"}},{"Del":{"text":"","pos":"POX3UAMTGCNS3SU5I6IKDNCCSHEAUSFBZ3WCMQ3EXKPNXETOI6BAC:2512"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":363,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":39723},"to":{"change":4,"start":39723,"end":39740},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":" NetworkMode ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39739"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":365,"ins":{"up_context":[{"change":4,"pos":39765}],"down_context":[{"change":4,"pos":39882}],"flag":"BLOCK","start":71808,"end":71906,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":39765},"to":{"change":4,"start":39765,"end":39812},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":39812},"to":{"change":5,"start":26197,"end":26231},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":26197},"to":{"change":5,"start":26197,"end":26231},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":26231},"to":{"change":4,"start":39813,"end":39882},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" Parser EventAmendment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71831"}},{"Add":{"text":"parseEventAmendmentV2 t o =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71859"}},{"Add":{"text":" let parseA :: Text -> Parser EventAmendment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71905"}}],"del_contents":[{"Del":{"text":" Parser (EventAmendment (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39811"}},{"Del":{"text":"parseEventAmendmentV2 nmode t o =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:26230"}},{"Del":{"text":" let parseA :: Text -> Parser (EventAmendment (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:39881"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":369,"ins":{"up_context":[{"change":4,"pos":39944}],"down_context":[{"change":4,"pos":40021}],"flag":"BLOCK","start":71907,"end":71978,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":39944},"to":{"change":4,"start":39944,"end":40021},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" parseA \"creditToChange\" = CreditToChange t <$> parseCreditToV2 o","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:71977"}}],"del_contents":[{"Del":{"text":" parseA \"creditToChange\" = CreditToChange t <$> parseCreditToV2 nmode o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40020"}}]}},{"Edit":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":376,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":40235},"to":{"change":4,"start":40235,"end":40252},"introduced_by":4}],"inode":{"change":5,"pos":19}}},"contents":[{"Del":{"text":" NetworkMode ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40251"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":379,"ins":{"up_context":[{"change":4,"pos":40302}],"down_context":[{"change":4,"pos":40407}],"flag":"BLOCK","start":71979,"end":72055,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":40302},"to":{"change":4,"start":40302,"end":40407},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" Parser (UTCTime -> LogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72009"}},{"Add":{"text":"parseLogEntry uid f = unversion \"LogEntry\" p","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72054"}}],"del_contents":[{"Del":{"text":" Parser (UTCTime -> (LogEntry (NetworkId, Address)))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40355"}},{"Del":{"text":"parseLogEntry nmode uid f = unversion \"LogEntry\" p","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40406"}}]}},{"Replacement":{"inode":{"change":5,"pos":19},"path":"lib/Aftok/Json.hs","line":383,"ins":{"up_context":[{"change":4,"pos":40442}],"down_context":[{"change":4,"pos":40580}],"flag":"BLOCK","start":72056,"end":72146,"inode":{"change":5,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":40442},"to":{"change":4,"start":40442,"end":40580},"introduced_by":4}],"inode":{"change":5,"pos":19}},"ins_contents":[{"Add":{"text":" creditTo' <- o .:? \"creditTo\" >>= maybe (pure $ CreditToUser uid) (parseCreditToV2)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72145"}}],"del_contents":[{"Del":{"text":" creditTo' <-","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40460"}},{"Del":{"text":" o .:? \"creditTo\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40485"}},{"Del":{"text":" >>= maybe","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40505"}},{"Del":{"text":" (pure $ CreditToUser uid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40543"}},{"Del":{"text":" (parseCreditToV2 nmode)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:40579"}}]}},{"FileAdd":{"meta":{"basename":"Bitcoin.hs","metadata":0},"context":[{"change":5,"pos":10523}],"contents":[{"Add":{"text":"{-# LANGUAGE DeriveTraversable #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72183"}},{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72216"}},{"Add":{"text":"{-# LANGUAGE TupleSections #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72247"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72248"}},{"Add":{"text":"module Aftok.Payments.Bitcoin where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72284"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72285"}},{"Add":{"text":"import Aftok.Billing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72306"}},{"Add":{"text":" ( Billable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72320"}},{"Add":{"text":" amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72332"}},{"Add":{"text":" project,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72345"}},{"Add":{"text":" requestExpiryPeriod,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72370"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72374"}},{"Add":{"text":"import Aftok.Currency (Currency (BTC))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72413"}},{"Add":{"text":"import Aftok.Currency.Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72443"}},{"Add":{"text":" ( NetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72460"}},{"Add":{"text":" _Satoshi,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72474"}},{"Add":{"text":" getNetwork,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72490"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72494"}},{"Add":{"text":"import Aftok.Currency.Bitcoin.Payments (PaymentKey (..), PaymentRequest (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72572"}},{"Add":{"text":"import Aftok.Database (MonadDB)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72604"}},{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72632"}},{"Add":{"text":" ( NativeRequest (Bip70Request),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72666"}},{"Add":{"text":" PaymentOps (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72687"}},{"Add":{"text":" PaymentRequestError,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72712"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72716"}},{"Add":{"text":"import Aftok.Payments.Util (MinPayout (..), getPayouts, getProjectPayoutFractions)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72799"}},{"Add":{"text":"import qualified Bippy as B","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72827"}},{"Add":{"text":"import qualified Bippy.Proto as P","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72861"}},{"Add":{"text":"import Bippy.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72880"}},{"Add":{"text":" ( Expiry (Expiry),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72901"}},{"Add":{"text":" Output (Output),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72922"}},{"Add":{"text":" PKIData,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72935"}},{"Add":{"text":" Satoshi (Satoshi),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72958"}},{"Add":{"text":" expiryTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72974"}},{"Add":{"text":" getExpires,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:72990"}},{"Add":{"text":" getPaymentDetails,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73013"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73017"}},{"Add":{"text":"import Control.Lens","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73037"}},{"Add":{"text":" ( (^.),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73047"}},{"Add":{"text":" makeLenses,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73063"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73067"}},{"Add":{"text":"import Control.Monad.Except (throwError)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73108"}},{"Add":{"text":"import Control.Monad.Trans.Except (except, withExceptT)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73164"}},{"Add":{"text":"import qualified Crypto.PubKey.RSA.Types as RSA","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73212"}},{"Add":{"text":" ( Error (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73228"}},{"Add":{"text":" PrivateKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73244"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73248"}},{"Add":{"text":"import Crypto.Random.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73275"}},{"Add":{"text":" ( MonadRandom,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73292"}},{"Add":{"text":" getRandomBytes,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73312"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73316"}},{"Add":{"text":"import Data.AffineSpace ((.+^))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73348"}},{"Add":{"text":"import Data.Map.Strict (assocs)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73380"}},{"Add":{"text":"import qualified Data.Text as T","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73412"}},{"Add":{"text":"import Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73441"}},{"Add":{"text":"import Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73469"}},{"Add":{"text":"import Haskoin.Address (Address (..), encodeBase58Check)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73526"}},{"Add":{"text":"import Haskoin.Script (ScriptOutput (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73568"}},{"Add":{"text":"import Network.URI (URI)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73593"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73594"}},{"Add":{"text":"data BillingOps (m :: * -> *)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73624"}},{"Add":{"text":" = BillingOps","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73639"}},{"Add":{"text":" { -- | generator for user memo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73676"}},{"Add":{"text":" memoGen ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73695"}},{"Add":{"text":" Billable Satoshi -> -- template for the bill","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73750"}},{"Add":{"text":" C.Day -> -- billing date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73785"}},{"Add":{"text":" C.UTCTime -> -- payment request generation time","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73843"}},{"Add":{"text":" m (Maybe Text),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73869"}},{"Add":{"text":" -- | generator for payment response URL","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73917"}},{"Add":{"text":" uriGen ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:73935"}},{"Add":{"text":" PaymentKey -> -- payment key to be included in the URL","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74000"}},{"Add":{"text":" m (Maybe URI),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74025"}},{"Add":{"text":" -- | generator for merchant payload","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74069"}},{"Add":{"text":" payloadGen ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74091"}},{"Add":{"text":" Billable Satoshi -> -- template for the bill","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74146"}},{"Add":{"text":" C.Day -> -- billing date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74181"}},{"Add":{"text":" C.UTCTime -> -- payment request generation time","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74239"}},{"Add":{"text":" m (Maybe ByteString)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74270"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74278"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74279"}},{"Add":{"text":"data PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74299"}},{"Add":{"text":" = PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74318"}},{"Add":{"text":" { _networkMode :: !NetworkMode,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74356"}},{"Add":{"text":" _signingKey :: !RSA.PrivateKey,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74396"}},{"Add":{"text":" _pkiData :: !PKIData,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74426"}},{"Add":{"text":" _minPayment :: !Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74458"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74466"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74467"}},{"Add":{"text":"makeLenses ''PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74495"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74496"}},{"Add":{"text":"data PaymentError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74514"}},{"Add":{"text":" = RequestError !PaymentRequestError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74552"}},{"Add":{"text":" | SigningError !RSA.Error","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74580"}},{"Add":{"text":" | IllegalAddress !Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74608"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74609"}},{"Add":{"text":"{- Check whether the specified payment request has expired (whether wallet software","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74693"}},{"Add":{"text":" - will still consider the payment request valid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74743"}},{"Add":{"text":" -}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74747"}},{"Add":{"text":"isExpired :: C.UTCTime -> P.PaymentRequest -> Bool","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74798"}},{"Add":{"text":"isExpired now req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74818"}},{"Add":{"text":" let check = any ((now >) . C.toThyme . expiryTime)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74871"}},{"Add":{"text":" in -- using error here is reasonable since it would indicate","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74935"}},{"Add":{"text":" -- a serialization problem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:74968"}},{"Add":{"text":" either (error . T.pack) (check . getExpires) $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75021"}},{"Add":{"text":" getPaymentDetails req","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75051"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75052"}},{"Add":{"text":"paymentOps ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75066"}},{"Add":{"text":" ( MonadRandom m,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75085"}},{"Add":{"text":" MonadDB m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75099"}},{"Add":{"text":" ) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75106"}},{"Add":{"text":" BillingOps m ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75124"}},{"Add":{"text":" PaymentsConfig ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75144"}},{"Add":{"text":" PaymentOps Satoshi (ExceptT PaymentError m)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75190"}},{"Add":{"text":"paymentOps ops cfg =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75211"}},{"Add":{"text":" PaymentOps","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75224"}},{"Add":{"text":" { newPaymentRequest = (((fmap Bip70Request) .) .) . bip70PaymentRequest ops cfg","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75308"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75314"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75315"}},{"Add":{"text":"bip70PaymentRequest ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75338"}},{"Add":{"text":" ( MonadRandom m,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75357"}},{"Add":{"text":" MonadDB m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75371"}},{"Add":{"text":" ) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75378"}},{"Add":{"text":" BillingOps m ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75396"}},{"Add":{"text":" PaymentsConfig ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75416"}},{"Add":{"text":" -- | bill denominated in satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75451"}},{"Add":{"text":" Billable Satoshi ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75473"}},{"Add":{"text":" -- | billing base date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75498"}},{"Add":{"text":" C.Day ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75509"}},{"Add":{"text":" -- | time at which the bill is being issued","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75555"}},{"Add":{"text":" UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75568"}},{"Add":{"text":" ExceptT PaymentError m PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75608"}},{"Add":{"text":"bip70PaymentRequest ops cfg billable billingDay billingTime = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75673"}},{"Add":{"text":" let billTotal = billable ^. amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75710"}},{"Add":{"text":" payoutTime = C.mkUTCTime billingDay (fromInteger 0)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75768"}},{"Add":{"text":" payoutFractions <- lift $ getProjectPayoutFractions payoutTime (billable ^. project)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75855"}},{"Add":{"text":" payouts <- withExceptT RequestError $ getPayouts payoutTime BTC (MinPayout $ cfg ^. minPayment) billTotal payoutFractions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:75979"}},{"Add":{"text":" outputs <- except $ traverse toOutput (assocs payouts)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76036"}},{"Add":{"text":" pkey <- PaymentKey . encodeBase58Check <$> lift (getRandomBytes 32)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76106"}},{"Add":{"text":" memo <- lift $ memoGen ops billable billingDay billingTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76167"}},{"Add":{"text":" uri <- lift $ uriGen ops pkey","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76199"}},{"Add":{"text":" payload <- lift $ payloadGen ops billable billingDay billingTime","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76266"}},{"Add":{"text":" let expiry = Expiry . C.fromThyme $ billingTime .+^ (billable ^. requestExpiryPeriod)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76354"}},{"Add":{"text":" let details =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76370"}},{"Add":{"text":" B.createPaymentDetails","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76401"}},{"Add":{"text":" (getNetwork (cfg ^. networkMode))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76445"}},{"Add":{"text":" outputs","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76463"}},{"Add":{"text":" (C.fromThyme billingTime)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76499"}},{"Add":{"text":" (Just expiry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76523"}},{"Add":{"text":" memo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76538"}},{"Add":{"text":" uri","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76552"}},{"Add":{"text":" payload","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76570"}},{"Add":{"text":" resp <- lift $ B.createPaymentRequest (cfg ^. signingKey) (cfg ^. pkiData) details","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76655"}},{"Add":{"text":" either (throwError . SigningError) (pure . PaymentRequest pkey) resp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76726"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76727"}},{"Add":{"text":"toOutput :: (Address, Satoshi) -> Either PaymentError Output","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76788"}},{"Add":{"text":"toOutput (addr, amt) = case addr of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76824"}},{"Add":{"text":" (PubKeyAddress a) -> Right (Output amt (PayPKHash a))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76880"}},{"Add":{"text":" other -> Left $ IllegalAddress other","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76919"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76920"}},{"Add":{"text":"outputAmount :: Satoshi -> Rational -> Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:76967"}},{"Add":{"text":"outputAmount i r = Satoshi . round $ toRational (i ^. _Satoshi) * r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77035"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":11,"ins":{"up_context":[{"change":4,"pos":41454}],"down_context":[{"change":4,"pos":41492}],"flag":"BLOCK","start":77074,"end":77130,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41454},"to":{"change":4,"start":41454,"end":41492},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":" Billable',","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77088"}},{"Add":{"text":" BillableId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77104"}},{"Add":{"text":" requestExpiryPeriod,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77129"}}],"del_contents":[{"Del":{"text":" Subscription,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41471"}},{"Del":{"text":" SubscriptionId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41491"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":15,"ins":{"up_context":[{"change":4,"pos":41496}],"down_context":[{"change":4,"pos":41626}],"flag":"BLOCK","start":77131,"end":77458,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41496},"to":{"change":4,"start":41496,"end":41626},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"import Aftok.Currency (Currency (..), Currency' (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77184"}},{"Add":{"text":"import Aftok.Currency.Bitcoin (Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77224"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin.Payments as B","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77278"}},{"Add":{"text":"import Aftok.Currency.Zcash (Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77316"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash.Payments as Z","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77368"}},{"Add":{"text":"import qualified Aftok.Currency.Zcash.Zip321 as Z","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77418"}},{"Add":{"text":"import Aftok.Types (ProjectId, UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77457"}}],"del_contents":[{"Del":{"text":"import qualified Bippy.Proto as P","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41529"}},{"Del":{"text":"import Bippy.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41548"}},{"Del":{"text":" ( Satoshi (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41566"}},{"Del":{"text":" expiryTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41582"}},{"Del":{"text":" getExpires,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41598"}},{"Del":{"text":" getPaymentDetails,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41621"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41625"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":23,"ins":{"up_context":[{"change":4,"pos":41646}],"down_context":[{"change":4,"pos":41662}],"flag":"BLOCK","start":77459,"end":77485,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41646},"to":{"change":4,"start":41646,"end":41662},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":" ( (^.),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77468"}},{"Add":{"text":" makeLenses,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77484"}}],"del_contents":[{"Del":{"text":" ( makeLenses,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41661"}}]}},{"Edit":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":26,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41678},"to":{"change":4,"start":41678,"end":41688},"introduced_by":4}],"inode":{"change":5,"pos":10545}}},"contents":[{"Del":{"text":" view,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41687"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":27,"ins":{"up_context":[{"change":4,"pos":41692}],"down_context":[{"change":4,"pos":41750}],"flag":"BLOCK","start":77486,"end":77518,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41692},"to":{"change":4,"start":41692,"end":41750},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"import Data.AffineSpace ((.+^))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77517"}}],"del_contents":[{"Del":{"text":"import Data.Aeson (Value)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41717"}},{"Del":{"text":"import qualified Data.Text as T","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41749"}}]}},{"Edit":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":31,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41824},"to":{"change":4,"start":41824,"end":41874},"introduced_by":4}],"inode":{"change":5,"pos":10545}}},"contents":[{"Del":{"text":"import Haskoin.Address.Base58 (decodeBase58Check)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41873"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":40,"ins":{"up_context":[{"change":5,"pos":1243}],"down_context":[{"change":4,"pos":41947}],"flag":"BLOCK","start":77519,"end":78078,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1243},"to":{"change":5,"start":28314,"end":28393},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28393},"to":{"change":5,"start":1243,"end":1294},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1243},"to":{"change":5,"start":1243,"end":1294},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"data NativeRequest currency where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77552"}},{"Add":{"text":" Bip70Request :: B.PaymentRequest -> NativeRequest Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77612"}},{"Add":{"text":" Zip321Request :: Z.PaymentRequest -> NativeRequest Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77673"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77674"}},{"Add":{"text":"bip70Request :: NativeRequest currency -> Maybe B.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77739"}},{"Add":{"text":"bip70Request = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77760"}},{"Add":{"text":" Bip70Request r -> Just r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77787"}},{"Add":{"text":" _ -> Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77802"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77803"}},{"Add":{"text":"zip321Request :: NativeRequest currency -> Maybe Z.PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77869"}},{"Add":{"text":"zip321Request = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77891"}},{"Add":{"text":" Zip321Request r -> Just r","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77919"}},{"Add":{"text":" _ -> Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77934"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77935"}},{"Add":{"text":"data NativePayment currency where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:77969"}},{"Add":{"text":" BitcoinPayment :: B.Payment -> NativePayment Satoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78024"}},{"Add":{"text":" ZcashPayment :: Z.Payment -> NativePayment Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78077"}}],"del_contents":[{"Del":{"text":"-- A unique identifier for the payment request, suitable","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28370"}},{"Del":{"text":"-- for URL embedding.","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28392"}},{"Del":{"text":"newtype PaymentKey = PaymentKey Text deriving (Eq)","pos":"4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC:1293"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":58,"ins":{"up_context":[{"change":4,"pos":41948}],"down_context":[{"change":5,"pos":11036}],"flag":"BLOCK","start":78079,"end":78362,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":41948},"to":{"change":5,"start":1294,"end":1318},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1294},"to":{"change":5,"start":1294,"end":1318},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"data PaymentOps currency m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78105"}},{"Add":{"text":" = PaymentOps","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78120"}},{"Add":{"text":" { newPaymentRequest ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78149"}},{"Add":{"text":" Billable currency -> -- billing information","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78203"}},{"Add":{"text":" C.Day -> -- payout date (billing date)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78252"}},{"Add":{"text":" C.UTCTime -> -- timestamp of payment request creation","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78316"}},{"Add":{"text":" m (NativeRequest currency)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78353"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78361"}}],"del_contents":[{"Del":{"text":"makePrisms ''PaymentKey","pos":"4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC:1317"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":67,"ins":{"up_context":[{"change":5,"pos":11037}],"down_context":[{"change":4,"pos":41972}],"flag":"BLOCK","start":78363,"end":78414,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11037},"to":{"change":4,"start":41949,"end":41972},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"data PaymentRequest' (billable :: * -> *) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78413"}}],"del_contents":[{"Del":{"text":"data PaymentRequest' s","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:41971"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":69,"ins":{"up_context":[{"change":4,"pos":41991}],"down_context":[{"change":4,"pos":42171}],"flag":"BLOCK","start":78415,"end":78568,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":41991},"to":{"change":4,"start":41991,"end":42171},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":" { _billable :: billable currency,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78454"}},{"Add":{"text":" _createdAt :: C.UTCTime,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78487"}},{"Add":{"text":" _billingDate :: C.Day,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78518"}},{"Add":{"text":" _nativeRequest :: NativeRequest currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78567"}}],"del_contents":[{"Del":{"text":" { _subscription :: s,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42018"}},{"Del":{"text":" _paymentRequest :: P.PaymentRequest,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42063"}},{"Del":{"text":" _paymentKey :: PaymentKey,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42098"}},{"Del":{"text":" _paymentRequestTime :: C.UTCTime,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42140"}},{"Del":{"text":" _billingDate :: C.Day","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42170"}}]}},{"Edit":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":74,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":42179},"to":{"change":4,"start":42179,"end":42223},"introduced_by":4}],"inode":{"change":5,"pos":10545}}},"contents":[{"Del":{"text":" deriving (Functor, Foldable, Traversable)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42222"}}]}},{"Edit":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":76,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":11220}],"down_context":[{"change":5,"pos":11220}],"flag":"BLOCK","start":78569,"end":78645,"inode":{"change":5,"pos":10545}}},"contents":[{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78569"}},{"Add":{"text":"type PaymentRequest currency = PaymentRequest' (Const BillableId) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78644"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":79,"ins":{"up_context":[{"change":5,"pos":11221}],"down_context":[{"change":5,"pos":11274}],"flag":"BLOCK","start":78646,"end":78737,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11221},"to":{"change":5,"start":11221,"end":11274},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"type PaymentRequestDetail currency = PaymentRequest' (Billable' ProjectId UserId) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78736"}}],"del_contents":[{"Del":{"text":"type PaymentRequest = PaymentRequest' SubscriptionId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:11273"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":81,"ins":{"up_context":[{"change":5,"pos":11275}],"down_context":[{"change":4,"pos":42241}],"flag":"BLOCK","start":78738,"end":79338,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11275},"to":{"change":4,"start":42225,"end":42241},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"data SomePaymentRequest (b :: * -> *) = forall c. SomePaymentRequest (PaymentRequest' b c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78828"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78829"}},{"Add":{"text":"type SomePaymentRequestDetail = SomePaymentRequest (Billable' ProjectId UserId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78909"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78910"}},{"Add":{"text":"paymentRequestCurrency :: PaymentRequest' b c -> Currency' c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:78971"}},{"Add":{"text":"paymentRequestCurrency pr = case _nativeRequest pr of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79025"}},{"Add":{"text":" Bip70Request _ -> Currency' BTC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79059"}},{"Add":{"text":" Zip321Request _ -> Currency' ZEC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79094"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79095"}},{"Add":{"text":"isExpired :: forall c. UTCTime -> PaymentRequestDetail c -> Bool","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79160"}},{"Add":{"text":"isExpired now req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79180"}},{"Add":{"text":" let expiresAt = (req ^. createdAt) .+^ (req ^. (billable . requestExpiryPeriod))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79263"}},{"Add":{"text":" in now >= expiresAt","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79286"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79287"}},{"Add":{"text":"data Payment' (paymentRequest :: * -> *) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79337"}}],"del_contents":[{"Del":{"text":"data Payment' r","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42240"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":97,"ins":{"up_context":[{"change":4,"pos":42253}],"down_context":[{"change":4,"pos":42307}],"flag":"BLOCK","start":79339,"end":79391,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":42253},"to":{"change":4,"start":42253,"end":42307},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":" { _paymentRequest :: paymentRequest currency,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79390"}}],"del_contents":[{"Del":{"text":" { _request :: r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42275"}},{"Del":{"text":" _payment :: P.Payment,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42306"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":99,"ins":{"up_context":[{"change":4,"pos":42342}],"down_context":[{"change":4,"pos":42380}],"flag":"BLOCK","start":79392,"end":79441,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":42342},"to":{"change":4,"start":42342,"end":42380},"introduced_by":4}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":" _nativePayment :: NativePayment currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79440"}}],"del_contents":[{"Del":{"text":" _exchangeRates :: Maybe Value","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42379"}}]}},{"Edit":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":101,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":42388},"to":{"change":4,"start":42388,"end":42432},"introduced_by":4}],"inode":{"change":5,"pos":10545}}},"contents":[{"Del":{"text":" deriving (Functor, Foldable, Traversable)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42431"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":104,"ins":{"up_context":[{"change":5,"pos":11410}],"down_context":[{"change":5,"pos":11451}],"flag":"BLOCK","start":79442,"end":79502,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11410},"to":{"change":5,"start":11410,"end":11451},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"data PaymentRequestError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79466"}},{"Add":{"text":" = AmountInvalid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79484"}},{"Add":{"text":" | NoRecipients","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79501"}}],"del_contents":[{"Del":{"text":"type Payment = Payment' PaymentRequestId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:11450"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":108,"ins":{"up_context":[{"change":5,"pos":11452}],"down_context":[{"change":5,"pos":4642}],"flag":"BLOCK","start":79503,"end":79570,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11452},"to":{"change":5,"start":1319,"end":1390},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"type Payment currency = Payment' (Const PaymentRequestId) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79569"}}],"del_contents":[{"Del":{"text":"type BillDetail = (PaymentKey, PaymentRequest, Subscription, Billable)","pos":"4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC:1389"}}]}},{"Replacement":{"inode":{"change":5,"pos":10545},"path":"lib/Aftok/Payments/Types.hs","line":110,"ins":{"up_context":[{"change":5,"pos":4643}],"down_context":[],"flag":"BLOCK","start":79571,"end":79666,"inode":{"change":5,"pos":10545}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":4643},"to":{"change":5,"start":6960,"end":7098},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11452},"to":{"change":5,"start":6960,"end":7098},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7098},"to":{"change":4,"start":42434,"end":42496},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4706},"to":{"change":5,"start":2489,"end":2509},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":41047},"to":{"change":5,"start":2489,"end":2509},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":42496},"to":{"change":5,"start":2489,"end":2509},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7149},"to":{"change":5,"start":2489,"end":2509},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2509},"to":{"change":5,"start":3729,"end":3782},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3782},"to":{"change":4,"start":42497,"end":42699},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3880},"to":{"change":5,"start":2571,"end":2572},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4793},"to":{"change":5,"start":2571,"end":2572},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":41250},"to":{"change":5,"start":2571,"end":2572},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":42699},"to":{"change":5,"start":2571,"end":2572},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7377},"to":{"change":5,"start":2571,"end":2572},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2572},"to":{"change":5,"start":1391,"end":1441},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1441},"to":{"change":5,"start":41251,"end":41338},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":27198},"to":{"change":5,"start":28394,"end":28498},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":41338},"to":{"change":5,"start":28394,"end":28498},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1513},"to":{"change":5,"start":28394,"end":28498},"introduced_by":5}],"inode":{"change":5,"pos":10545}},"ins_contents":[{"Add":{"text":"type PaymentDetail currency = Payment' (PaymentRequest' (Billable' ProjectId UserId)) currency","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79665"}}],"del_contents":[{"Del":{"text":"{- Check whether the specified payment request has expired (whether wallet software","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:7043"}},{"Del":{"text":" - will still consider the payment request valid)","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:7093"}},{"Del":{"text":" -}","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:7097"}},{"Del":{"text":"isExpired :: forall s. C.UTCTime -> PaymentRequest' s -> Bool","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42495"}},{"Del":{"text":"isExpired now req =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:2508"}},{"Del":{"text":" let check = any ((now >) . C.toThyme . expiryTime)","pos":"4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC:3781"}},{"Del":{"text":" in -- using error here is reasonable since it would indicate","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42560"}},{"Del":{"text":" -- a serialization problem","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42593"}},{"Del":{"text":" either (error . T.pack) (check . getExpires) $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42646"}},{"Del":{"text":" getPaymentDetails (view paymentRequest req)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42698"}},{"Del":{"text":"","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:2571"}},{"Del":{"text":"parsePaymentKey :: ByteString -> Maybe PaymentKey","pos":"4FDQGIXN3Z4J55DILCSI5EOLIIA7R5CADTGFMW5X7N7MH6JIMBWAC:1440"}},{"Del":{"text":"parsePaymentKey bs =","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:41271"}},{"Del":{"text":" (PaymentKey . decodeUtf8) <$> decodeBase58Check (decodeUtf8 bs)","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:41337"}},{"Del":{"text":"","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28394"}},{"Del":{"text":"paymentRequestTotal :: P.PaymentRequest -> Satoshi","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28445"}},{"Del":{"text":"paymentRequestTotal _ = error \"Not yet implemented\"","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28497"}}]}},{"FileAdd":{"meta":{"basename":"Util.hs","metadata":0},"context":[{"change":5,"pos":10523}],"contents":[{"Add":{"text":"{-# LANGUAGE TupleSections #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79699"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79700"}},{"Add":{"text":"module Aftok.Payments.Util where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79733"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79734"}},{"Add":{"text":"import Aftok.Currency (Currency, scaleCurrency)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79782"}},{"Add":{"text":"import Aftok.Database","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79804"}},{"Add":{"text":" ( DBOp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79813"}},{"Add":{"text":" ( FindProject,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79834"}},{"Add":{"text":" ReadWorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79856"}},{"Add":{"text":" ),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79865"}},{"Add":{"text":" MonadDB,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79878"}},{"Add":{"text":" findAccountPaymentAddress,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79909"}},{"Add":{"text":" findUserPaymentAddress,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79937"}},{"Add":{"text":" liftdb,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79949"}},{"Add":{"text":" raiseSubjectNotFound,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79975"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:79979"}},{"Add":{"text":"import Aftok.Payments.Types (PaymentRequestError (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80034"}},{"Add":{"text":"import Aftok.Project (depf)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80062"}},{"Add":{"text":"import qualified Aftok.TimeLog as TL","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80099"}},{"Add":{"text":"import Aftok.Types (ProjectId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80130"}},{"Add":{"text":"import Control.Error.Util (note)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80163"}},{"Add":{"text":"import Control.Lens ((^.))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80190"}},{"Add":{"text":"import Control.Monad.Trans.Except (except)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80233"}},{"Add":{"text":"import Data.Map.Strict (assocs, fromListWith)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80279"}},{"Add":{"text":"import Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80308"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80309"}},{"Add":{"text":"getProjectPayoutFractions ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80338"}},{"Add":{"text":" (MonadDB m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80355"}},{"Add":{"text":" C.UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80370"}},{"Add":{"text":" ProjectId ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80385"}},{"Add":{"text":" m TL.FractionalPayouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80410"}},{"Add":{"text":"getProjectPayoutFractions ptime pid = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80451"}},{"Add":{"text":" project' <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80465"}},{"Add":{"text":" let projectOp = FindProject pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80501"}},{"Add":{"text":" in maybe (raiseSubjectNotFound projectOp) pure =<< liftdb projectOp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80574"}},{"Add":{"text":" widx <- liftdb $ ReadWorkIndex pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80611"}},{"Add":{"text":" pure $ TL.payouts (TL.toDepF $ project' ^. depf) ptime widx","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80673"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80674"}},{"Add":{"text":"newtype MinPayout c = MinPayout c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80708"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80709"}},{"Add":{"text":"getPayouts ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80723"}},{"Add":{"text":" (MonadDB m, Ord a, Semigroup c, Ord c) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80767"}},{"Add":{"text":" -- | time used in computation of payouts when `creditTo` is another project","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80845"}},{"Add":{"text":" C.UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80860"}},{"Add":{"text":" -- | the currency with which the payment will be made","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80916"}},{"Add":{"text":" Currency a c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:80934"}},{"Add":{"text":" -- | the minimum payout amount, below which values are disregarded (avoids dust)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81017"}},{"Add":{"text":" MinPayout c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81034"}},{"Add":{"text":" -- | the amount to pay in total","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81068"}},{"Add":{"text":" c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81075"}},{"Add":{"text":" -- | the fractions of the total payout to pay to each recipient","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81141"}},{"Add":{"text":" TL.FractionalPayouts ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81167"}},{"Add":{"text":" ExceptT PaymentRequestError m (Map a c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81209"}},{"Add":{"text":"getPayouts t currency mp@(MinPayout minAmt) amt payouts =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81267"}},{"Add":{"text":" if amt <= minAmt","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81286"}},{"Add":{"text":" then pure mempty","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81307"}},{"Add":{"text":" else do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81319"}},{"Add":{"text":" -- Multiply the total by each payout fraction. This may fail, so traverse.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81400"}},{"Add":{"text":" let scaled frac = note AmountInvalid $ scaleCurrency currency amt frac","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81477"}},{"Add":{"text":" payoutFractions <- except $ traverse scaled (payouts ^. TL._Payouts)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81552"}},{"Add":{"text":" fromListWith (<>) . join <$> traverse (uncurry (getPayoutAmounts t currency mp)) (assocs payoutFractions)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81664"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81665"}},{"Add":{"text":"getPayoutAmounts ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81685"}},{"Add":{"text":" (MonadDB m, Ord a, Semigroup c, Ord c) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81729"}},{"Add":{"text":" -- | time used in computation of payouts when `creditTo` is another project","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81807"}},{"Add":{"text":" C.UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81822"}},{"Add":{"text":" -- | the network on which the payment will be made","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81875"}},{"Add":{"text":" Currency a c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81893"}},{"Add":{"text":" -- | the minimum payout amount, below which amounts will be disregarded (avoids dust)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81981"}},{"Add":{"text":" MinPayout c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:81998"}},{"Add":{"text":" -- | the recipient of the payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82034"}},{"Add":{"text":" TL.CreditTo ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82051"}},{"Add":{"text":" -- | the amount to pay to the recipient","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82093"}},{"Add":{"text":" c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82100"}},{"Add":{"text":" ExceptT PaymentRequestError m [(a, c)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82141"}},{"Add":{"text":"getPayoutAmounts t network mp creditTo amt = case creditTo of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82203"}},{"Add":{"text":" (TL.CreditToAccount aid) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82233"}},{"Add":{"text":" fmap (,amt) . maybeToList <$> (lift . runMaybeT $ findAccountPaymentAddress aid network)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82326"}},{"Add":{"text":" (TL.CreditToUser uid) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82353"}},{"Add":{"text":" fmap (,amt) . maybeToList <$> (lift . runMaybeT $ findUserPaymentAddress uid network)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82443"}},{"Add":{"text":" (TL.CreditToProject pid) -> do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82476"}},{"Add":{"text":" payouts <- lift $ getProjectPayoutFractions t pid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82530"}},{"Add":{"text":" assocs <$> getPayouts t network mp amt payouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82581"}}]}},{"FileAdd":{"meta":{"basename":"Zcash.hs","metadata":0},"context":[{"change":5,"pos":10523}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82649"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82650"}},{"Add":{"text":"module Aftok.Payments.Zcash where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82684"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82685"}},{"Add":{"text":"import Aftok.Billing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82706"}},{"Add":{"text":" ( Billable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82720"}},{"Add":{"text":" amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82732"}},{"Add":{"text":" messageText,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82749"}},{"Add":{"text":" project,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82762"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82766"}},{"Add":{"text":"import Aftok.Currency (Currency (ZEC))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82805"}},{"Add":{"text":"import Aftok.Currency.Zcash (Address, Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82852"}},{"Add":{"text":"import Aftok.Currency.Zcash.Zip321 (PaymentItem (..), PaymentRequest (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82927"}},{"Add":{"text":"import Aftok.Database (MonadDB)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:82959"}},{"Add":{"text":"import qualified Aftok.Payments.Types as PT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83003"}},{"Add":{"text":"import Aftok.Payments.Util (MinPayout (..), getPayouts, getProjectPayoutFractions)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83086"}},{"Add":{"text":"import Control.Error.Safe (tryJust)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83122"}},{"Add":{"text":"import Control.Lens ((^.), makeLenses)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83161"}},{"Add":{"text":"import Data.Map.Strict (assocs)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83193"}},{"Add":{"text":"import Data.Thyme.Clock as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83222"}},{"Add":{"text":"import Data.Thyme.Time as C","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83250"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83251"}},{"Add":{"text":"data PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83271"}},{"Add":{"text":" = PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83290"}},{"Add":{"text":" { _minAmt :: Zatoshi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83317"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83325"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83326"}},{"Add":{"text":"makeLenses ''PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83354"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83355"}},{"Add":{"text":"paymentOps ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83369"}},{"Add":{"text":" (MonadDB m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83386"}},{"Add":{"text":" PaymentsConfig ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83406"}},{"Add":{"text":" PT.PaymentOps Zatoshi (ExceptT PT.PaymentRequestError m)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83465"}},{"Add":{"text":"paymentOps cfg =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83482"}},{"Add":{"text":" PT.PaymentOps","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83498"}},{"Add":{"text":" { PT.newPaymentRequest = ((fmap PT.Zip321Request .) .) . zip321PaymentRequest cfg","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83584"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83590"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83591"}},{"Add":{"text":"zip321PaymentRequest ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83615"}},{"Add":{"text":" (MonadDB m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83632"}},{"Add":{"text":" PaymentsConfig ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83652"}},{"Add":{"text":" -- | billing information","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83679"}},{"Add":{"text":" Billable Zatoshi ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83701"}},{"Add":{"text":" -- | payout date (billing date)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83735"}},{"Add":{"text":" C.Day ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83746"}},{"Add":{"text":" -- | timestamp for payment request creation","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83792"}},{"Add":{"text":" C.UTCTime ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83807"}},{"Add":{"text":" ExceptT PT.PaymentRequestError m PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83857"}},{"Add":{"text":"zip321PaymentRequest cfg billable billingDay _ = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83909"}},{"Add":{"text":" let payoutTime = C.mkUTCTime billingDay (fromInteger 0)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:83967"}},{"Add":{"text":" billTotal = billable ^. amount","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84004"}},{"Add":{"text":" payoutFractions <- lift $ getProjectPayoutFractions payoutTime (billable ^. project)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84091"}},{"Add":{"text":" payouts <- getPayouts payoutTime ZEC (MinPayout $ cfg ^. minAmt) billTotal payoutFractions","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84184"}},{"Add":{"text":" PaymentRequest <$> (tryJust PT.NoRecipients $ nonEmpty (toPaymentItem <$> assocs payouts))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84277"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84285"}},{"Add":{"text":" toPaymentItem :: (Address, Zatoshi) -> PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84340"}},{"Add":{"text":" toPaymentItem (a, z) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84367"}},{"Add":{"text":" PaymentItem","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84385"}},{"Add":{"text":" { _address = a,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84409"}},{"Add":{"text":" _label = Nothing,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84437"}},{"Add":{"text":" _message = billable ^. messageText,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84483"}},{"Add":{"text":" _amount = z,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84506"}},{"Add":{"text":" _memo = Nothing, -- Just . Memo $ toASCIIBytes (reqid ^. PT._PaymentRequestId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84596"}},{"Add":{"text":" _other = []","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84618"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84628"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":12,"ins":{"up_context":[{"change":4,"pos":42852}],"down_context":[{"change":4,"pos":42947}],"flag":"BLOCK","start":84664,"end":84763,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":42852},"to":{"change":4,"start":42852,"end":42947},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ( Billable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84677"}},{"Add":{"text":" BillableId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84693"}},{"Add":{"text":" Subscription,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84711"}},{"Add":{"text":" Subscription',","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84730"}},{"Add":{"text":" SubscriptionId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84750"}},{"Add":{"text":" amount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84762"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Bitcoin","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42881"}},{"Del":{"text":" ( NetworkId (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42901"}},{"Del":{"text":" NetworkMode,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42918"}},{"Del":{"text":" satoshi,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42931"}},{"Del":{"text":" toNetwork,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:42946"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":19,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":42951}],"down_context":[{"change":4,"pos":42951}],"flag":"BLOCK","start":84764,"end":84867,"inode":{"change":5,"pos":5686}}},"contents":[{"Add":{"text":"import qualified Aftok.Billing as B","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84799"}},{"Add":{"text":"import Aftok.Currency (Amount (..), Currency (..), Currency' (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84866"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":22,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":42973}],"down_context":[{"change":4,"pos":42973}],"flag":"BLOCK","start":84868,"end":85233,"inode":{"change":5,"pos":5686}}},"contents":[{"Add":{"text":" ( DBOp","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84876"}},{"Add":{"text":" ( FindBillable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84898"}},{"Add":{"text":" FindSubscription","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84923"}},{"Add":{"text":" ),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84932"}},{"Add":{"text":" MonadDB,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84945"}},{"Add":{"text":" OpForbiddenReason (UserNotSubscriber),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:84988"}},{"Add":{"text":" findBillable,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85006"}},{"Add":{"text":" findPayment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85023"}},{"Add":{"text":" findSubscriptionPaymentRequests,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85060"}},{"Add":{"text":" findSubscriptionUnpaidRequests,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85096"}},{"Add":{"text":" liftdb,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85108"}},{"Add":{"text":" raiseOpForbidden,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85130"}},{"Add":{"text":" raiseSubjectNotFound,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85156"}},{"Add":{"text":" storePaymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85181"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85185"}},{"Add":{"text":"import qualified Aftok.Payments.Bitcoin as BTC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85232"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":39,"ins":{"up_context":[{"change":4,"pos":43001}],"down_context":[{"change":4,"pos":43066}],"flag":"BLOCK","start":85234,"end":85600,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43001},"to":{"change":4,"start":43001,"end":43066},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ( NativeRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85257"}},{"Add":{"text":" Payment,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85270"}},{"Add":{"text":" PaymentOps (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85291"}},{"Add":{"text":" PaymentRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85311"}},{"Add":{"text":" PaymentRequest' (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85337"}},{"Add":{"text":" PaymentRequestDetail,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85363"}},{"Add":{"text":" PaymentRequestId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85385"}},{"Add":{"text":" SomePaymentRequest (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85414"}},{"Add":{"text":" SomePaymentRequestDetail,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85444"}},{"Add":{"text":" billingDate,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85461"}},{"Add":{"text":" isExpired,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85476"}},{"Add":{"text":" paymentRequestCurrency,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85504"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85508"}},{"Add":{"text":"import qualified Aftok.Payments.Types as PT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85552"}},{"Add":{"text":"import qualified Aftok.Payments.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85599"}}],"del_contents":[{"Del":{"text":"import Aftok.Project (depf)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43028"}},{"Del":{"text":"import qualified Aftok.TimeLog as TL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43065"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":55,"ins":{"up_context":[{"change":4,"pos":43085}],"down_context":[{"change":4,"pos":43112}],"flag":"BLOCK","start":85601,"end":85613,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43085},"to":{"change":4,"start":43085,"end":43112},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ( UserId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85612"}}],"del_contents":[{"Del":{"text":" ( ProjectId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43099"}},{"Del":{"text":" UserId,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43111"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":57,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43116},"to":{"change":4,"start":43116,"end":43213},"introduced_by":4}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":"import qualified Bippy as B","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43143"}},{"Del":{"text":"import qualified Bippy.Proto as P","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43177"}},{"Del":{"text":"import qualified Bippy.Types as BT","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43212"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":59,"ins":{"up_context":[{"change":4,"pos":43268}],"down_context":[{"change":4,"pos":43278}],"flag":"BLOCK","start":85614,"end":85624,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43268},"to":{"change":4,"start":43268,"end":43278},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ( (.~),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85623"}}],"del_contents":[{"Del":{"text":" ( (%~),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43277"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":61,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43288},"to":{"change":4,"start":43288,"end":43304},"introduced_by":4}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":" makeClassy,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43303"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":62,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":43326}],"down_context":[{"change":4,"pos":43326}],"flag":"BLOCK","start":85625,"end":85641,"inode":{"change":5,"pos":5686}}},"contents":[{"Add":{"text":" makeLenses,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85640"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":65,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43354},"to":{"change":4,"start":43354,"end":43364},"introduced_by":4}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":" view,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43363"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":66,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43368},"to":{"change":4,"start":43368,"end":43394},"introduced_by":4}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":"import Control.Lens.Tuple","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43393"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":67,"ins":{"up_context":[{"change":4,"pos":43422}],"down_context":[{"change":4,"pos":43454}],"flag":"BLOCK","start":85642,"end":85675,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43422},"to":{"change":4,"start":43422,"end":43454},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ( throwError,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85657"}},{"Add":{"text":" withExceptT,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85674"}}],"del_contents":[{"Del":{"text":" ( MonadError,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43437"}},{"Del":{"text":" throwError,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43453"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":70,"ins":{"up_context":[{"change":4,"pos":43458}],"down_context":[{"change":4,"pos":43674}],"flag":"BLOCK","start":85676,"end":85719,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43458},"to":{"change":4,"start":43458,"end":43674},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":"import qualified Crypto.Random.Types as CR","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85718"}}],"del_contents":[{"Del":{"text":"import qualified Crypto.PubKey.RSA.Types as RSA","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43505"}},{"Del":{"text":" ( Error (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43521"}},{"Del":{"text":" PrivateKey,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43537"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43541"}},{"Del":{"text":"import Crypto.Random.Types","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43568"}},{"Del":{"text":" ( MonadRandom,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43585"}},{"Del":{"text":" getRandomBytes,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43605"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43609"}},{"Del":{"text":"import Data.AffineSpace ((.+^))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43641"}},{"Del":{"text":"import Data.Map.Strict (assocs)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43673"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":73,"ins":{"up_context":[{"change":4,"pos":43731}],"down_context":[{"change":5,"pos":3882}],"flag":"BLOCK","start":85720,"end":85742,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43731},"to":{"change":4,"start":43731,"end":43880},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":"import Network.URI ()","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85741"}}],"del_contents":[{"Del":{"text":"import Haskoin.Address (Address (..))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43768"}},{"Del":{"text":"import Haskoin.Address.Base58 (encodeBase58Check)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43818"}},{"Del":{"text":"import Haskoin.Script (ScriptOutput (..))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43860"}},{"Del":{"text":"import Network.URI","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43879"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":75,"ins":{"up_context":[{"change":5,"pos":3883}],"down_context":[{"change":4,"pos":43901}],"flag":"BLOCK","start":85743,"end":85765,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3883},"to":{"change":4,"start":43881,"end":43901},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":"data PaymentsConfig m","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85764"}}],"del_contents":[{"Del":{"text":"data PaymentsConfig","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43900"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":77,"ins":{"up_context":[{"change":4,"pos":43920}],"down_context":[{"change":4,"pos":44030}],"flag":"BLOCK","start":85766,"end":85926,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":43920},"to":{"change":4,"start":43920,"end":44030},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" { _bitcoinBillingOps :: !(BTC.BillingOps m),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85816"}},{"Add":{"text":" _bitcoinPaymentsConfig :: !BTC.PaymentsConfig,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85871"}},{"Add":{"text":" _zcashPaymentsConfig :: !Zcash.PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85925"}}],"del_contents":[{"Del":{"text":" { _networkMode :: !NetworkMode,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43957"}},{"Del":{"text":" _signingKey :: !RSA.PrivateKey,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:43997"}},{"Del":{"text":" _pkiData :: !BT.PKIData","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44029"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":82,"ins":{"up_context":[{"change":5,"pos":12460}],"down_context":[{"change":5,"pos":7759}],"flag":"BLOCK","start":85927,"end":85955,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12583},"to":{"change":5,"start":28779,"end":28807},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":"makeLenses ''PaymentsConfig","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85954"}}],"del_contents":[{"Del":{"text":"makeClassy ''PaymentsConfig","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:28806"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":84,"ins":{"up_context":[{"change":5,"pos":7760}],"down_context":[{"change":4,"pos":44758}],"flag":"BLOCK","start":85956,"end":85984,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7760},"to":{"change":4,"start":44039,"end":44757},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":44757},"to":{"change":5,"start":8106,"end":8107},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8106},"to":{"change":5,"start":8106,"end":8107},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8107},"to":{"change":5,"start":4081,"end":4107},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":"data PaymentRequestStatus c","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:85983"}}],"del_contents":[{"Del":{"text":"data BillingOps (m :: * -> *)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44068"}},{"Del":{"text":" = BillingOps","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44083"}},{"Del":{"text":" { -- | generator for user memo","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44120"}},{"Del":{"text":" memoGen ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44139"}},{"Del":{"text":" Subscription' UserId Billable -> -- subscription being billed","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44211"}},{"Del":{"text":" T.Day -> -- billing date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44246"}},{"Del":{"text":" C.UTCTime -> -- payment request generation time","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44304"}},{"Del":{"text":" m (Maybe Text),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44330"}},{"Del":{"text":" -- | generator for payment response URL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44378"}},{"Del":{"text":" uriGen ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44396"}},{"Del":{"text":" PaymentKey -> -- payment key to be included in the URL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44461"}},{"Del":{"text":" m (Maybe URI),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44486"}},{"Del":{"text":" -- | generator for merchant payload","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44530"}},{"Del":{"text":" payloadGen ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44552"}},{"Del":{"text":" Subscription' UserId Billable -> -- subscription being billed","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44624"}},{"Del":{"text":" T.Day -> -- billing date","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44659"}},{"Del":{"text":" C.UTCTime -> -- payment request generation time","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44717"}},{"Del":{"text":" m (Maybe ByteString)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44748"}},{"Del":{"text":" }","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44756"}},{"Del":{"text":"","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:8106"}},{"Del":{"text":"data PaymentRequestStatus","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4106"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":86,"ins":{"up_context":[{"change":4,"pos":44815}],"down_context":[{"change":4,"pos":44833}],"flag":"BLOCK","start":85985,"end":86007,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":44815},"to":{"change":4,"start":44815,"end":44833},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" Paid !(Payment c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86006"}}],"del_contents":[{"Del":{"text":" Paid !Payment","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44832"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":88,"ins":{"up_context":[{"change":4,"pos":44897}],"down_context":[{"change":4,"pos":44924}],"flag":"BLOCK","start":86008,"end":86052,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":44897},"to":{"change":4,"start":44897,"end":44924},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" forall b. Unpaid !(PaymentRequest' b c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86051"}}],"del_contents":[{"Del":{"text":" Unpaid !PaymentRequest","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:44923"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":90,"ins":{"up_context":[{"change":4,"pos":44987}],"down_context":[{"change":5,"pos":12610}],"flag":"BLOCK","start":86053,"end":86098,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":44987},"to":{"change":4,"start":44987,"end":45015},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" forall b. Expired !(PaymentRequest' b c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86097"}}],"del_contents":[{"Del":{"text":" Expired !PaymentRequest","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45014"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":93,"ins":{"up_context":[{"change":5,"pos":8406}],"down_context":[{"change":4,"pos":45016}],"flag":"BLOCK","start":86099,"end":86254,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8406},"to":{"change":5,"start":29725,"end":29781},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":29781},"to":{"change":5,"start":27776,"end":27804},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" = RequestError PT.PaymentRequestError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86138"}},{"Add":{"text":" | Overdue !PaymentRequestId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86168"}},{"Add":{"text":" | BTCPaymentError !BTC.PaymentError","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86206"}},{"Add":{"text":" | BillableIdMismatch !BillableId !BillableId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86253"}}],"del_contents":[{"Del":{"text":" = Overdue !SubscriptionId","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29752"}},{"Del":{"text":" | SigningError !RSA.Error","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29780"}},{"Del":{"text":" | IllegalAddress !Address","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:27803"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":99,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8492},"to":{"change":5,"start":4108,"end":4109},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4109},"to":{"change":5,"start":29782,"end":29955},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":29955},"to":{"change":4,"start":45018,"end":45432},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":7632},"to":{"change":5,"start":9049,"end":9095},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":45432},"to":{"change":5,"start":9049,"end":9095},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13305},"to":{"change":5,"start":9049,"end":9095},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9095},"to":{"change":5,"start":13366,"end":13414},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13366},"to":{"change":5,"start":13366,"end":13414},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13414},"to":{"change":5,"start":2838,"end":2916},"introduced_by":5}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":"","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4108"}},{"Del":{"text":"{--","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29785"}},{"Del":{"text":" - Find all the subscriptions for the specified customer, and","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29847"}},{"Del":{"text":" - determine which if any are up for renewal. Create a payment","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29910"}},{"Del":{"text":" - request for each such subscription.","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29949"}},{"Del":{"text":" --}","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:29954"}},{"Del":{"text":"createPaymentRequests ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45042"}},{"Del":{"text":" ( MonadRandom m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45061"}},{"Del":{"text":" MonadReader r m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45082"}},{"Del":{"text":" HasPaymentsConfig r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45107"}},{"Del":{"text":" MonadError e m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45127"}},{"Del":{"text":" AsPaymentError e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45149"}},{"Del":{"text":" MonadDB m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45163"}},{"Del":{"text":" ) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45170"}},{"Del":{"text":" -- | generators for payment request components","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45219"}},{"Del":{"text":" BillingOps m ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45237"}},{"Del":{"text":" -- | timestamp for payment request creation","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45283"}},{"Del":{"text":" C.UTCTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45298"}},{"Del":{"text":" -- | customer responsible for payment","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45338"}},{"Del":{"text":" UserId ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45350"}},{"Del":{"text":" -- | project whose worklog is to be paid","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45393"}},{"Del":{"text":" ProjectId ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45408"}},{"Del":{"text":" m [PaymentRequestId]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45431"}},{"Del":{"text":"createPaymentRequests ops now custId pid = do","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:9094"}},{"Del":{"text":" subscriptions <- findSubscriptions custId pid","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:13413"}},{"Del":{"text":" join <$> traverse (createSubscriptionPaymentRequests ops now) subscriptions","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:2915"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":101,"ins":{"up_context":[{"change":4,"pos":45470}],"down_context":[{"change":4,"pos":45616}],"flag":"BLOCK","start":86255,"end":86324,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":45470},"to":{"change":4,"start":45470,"end":45616},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" forall m.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86266"}},{"Add":{"text":" (MonadDB m, CR.MonadRandom m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86301"}},{"Add":{"text":" PaymentsConfig m ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86323"}}],"del_contents":[{"Del":{"text":" ( MonadRandom m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45488"}},{"Del":{"text":" MonadReader r m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45509"}},{"Del":{"text":" HasPaymentsConfig r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45534"}},{"Del":{"text":" MonadError e m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45554"}},{"Del":{"text":" AsPaymentError e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45576"}},{"Del":{"text":" MonadDB m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45590"}},{"Del":{"text":" ) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45597"}},{"Del":{"text":" BillingOps m ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45615"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":106,"ins":{"up_context":[{"change":4,"pos":45667}],"down_context":[{"change":4,"pos":45809}],"flag":"BLOCK","start":86325,"end":86822,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":45667},"to":{"change":4,"start":45667,"end":45690},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":45690},"to":{"change":5,"start":2917,"end":2975},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9458},"to":{"change":5,"start":2917,"end":2975},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2975},"to":{"change":5,"start":7785,"end":7802},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7802},"to":{"change":4,"start":45691,"end":45808},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":7919},"to":{"change":5,"start":9653,"end":9698},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":30120},"to":{"change":5,"start":9653,"end":9698},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":45808},"to":{"change":5,"start":9653,"end":9698},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9653},"to":{"change":5,"start":9653,"end":9698},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ExceptT PaymentError m [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86396"}},{"Add":{"text":"createSubscriptionPaymentRequests cfg now (sid, sub) = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86454"}},{"Add":{"text":" -- fill in the billable for the subscription","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86501"}},{"Add":{"text":" sub' <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86511"}},{"Add":{"text":" lift . maybeT (raiseSubjectNotFound . FindBillable $ billableId) pure $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86587"}},{"Add":{"text":" traverseOf B.billable findBillable sub","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86632"}},{"Add":{"text":" -- get previous payment requests & augment with billable information","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86703"}},{"Add":{"text":" paymentRequests <- lift $ findSubscriptionPaymentRequests sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86767"}},{"Add":{"text":" -- find dates for which no bill has yet been issued","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86821"}}],"del_contents":[{"Del":{"text":" m [PaymentRequestId]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45689"}},{"Del":{"text":"createSubscriptionPaymentRequests ops now (sid, sub) = do","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:2974"}},{"Del":{"text":" billableSub <-","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:7801"}},{"Del":{"text":" maybeT (raiseSubjectNotFound . FindBillable $ sub ^. billable) pure $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45764"}},{"Del":{"text":" traverseOf billable findBillable sub","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45807"}},{"Del":{"text":" paymentRequests <- findPaymentRequests sid","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:9697"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":116,"ins":{"up_context":[{"change":4,"pos":45828}],"down_context":[{"change":5,"pos":9949}],"flag":"BLOCK","start":86823,"end":87943,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":45828},"to":{"change":5,"start":7941,"end":8011},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":7941},"to":{"change":5,"start":7941,"end":8011},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8011},"to":{"change":4,"start":45829,"end":45905},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":8083},"to":{"change":5,"start":2976,"end":3048},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":45905},"to":{"change":5,"start":2976,"end":3048},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9870},"to":{"change":5,"start":2976,"end":3048},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" findUnbilledDates now paymentRequests","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86864"}},{"Add":{"text":" . takeWhile (< now ^. _utctDay)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86902"}},{"Add":{"text":" $ B.billingSchedule sub'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86933"}},{"Add":{"text":" traverse (createPaymentRequest' sub') billableDates","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86987"}},{"Add":{"text":" where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:86995"}},{"Add":{"text":" billableId = sub ^. B.billable","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87030"}},{"Add":{"text":" -- create a payment request for the specified unbilled date","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87094"}},{"Add":{"text":" createPaymentRequest' ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87123"}},{"Add":{"text":" Subscription' UserId (Billable Amount) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87171"}},{"Add":{"text":" T.Day ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87186"}},{"Add":{"text":" ExceptT PaymentError m (PaymentRequestId, SomePaymentRequestDetail)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87260"}},{"Add":{"text":" createPaymentRequest' sub' day =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87297"}},{"Add":{"text":" let bill = sub' ^. B.billable","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87333"}},{"Add":{"text":" in case bill ^. amount of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87366"}},{"Add":{"text":" Amount BTC sats -> withExceptT BTCPaymentError $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87430"}},{"Add":{"text":" let ops = BTC.paymentOps (cfg ^. bitcoinBillingOps) (cfg ^. bitcoinPaymentsConfig)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87527"}},{"Add":{"text":" bill' = bill & amount .~ sats","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87575"}},{"Add":{"text":" second SomePaymentRequest <$> createPaymentRequest ops now billableId bill' day","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87669"}},{"Add":{"text":" Amount ZEC zats -> withExceptT RequestError $ do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87730"}},{"Add":{"text":" let ops = Zcash.paymentOps (cfg ^. zcashPaymentsConfig)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87800"}},{"Add":{"text":" bill' = bill & amount .~ zats","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87848"}},{"Add":{"text":" second SomePaymentRequest <$> createPaymentRequest ops now billableId bill' day","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87942"}}],"del_contents":[{"Del":{"text":" findUnbilledDates now (view billable billableSub) paymentRequests","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:8010"}},{"Del":{"text":" $ takeWhile (< view _utctDay now)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45868"}},{"Del":{"text":" $ billingSchedule billableSub","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45904"}},{"Del":{"text":" traverse (createPaymentRequest ops now sid billableSub) billableDates","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3047"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":140,"ins":{"up_context":[{"change":4,"pos":45930}],"down_context":[{"change":4,"pos":46076}],"flag":"BLOCK","start":87944,"end":87988,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":45930},"to":{"change":4,"start":45930,"end":46076},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" (MonadDB m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87960"}},{"Add":{"text":" PaymentOps currency m ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:87987"}}],"del_contents":[{"Del":{"text":" ( MonadRandom m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45948"}},{"Del":{"text":" MonadReader r m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45969"}},{"Del":{"text":" HasPaymentsConfig r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:45994"}},{"Del":{"text":" MonadError e m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46014"}},{"Del":{"text":" AsPaymentError e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46036"}},{"Del":{"text":" MonadDB m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46050"}},{"Del":{"text":" ) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46057"}},{"Del":{"text":" BillingOps m ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46075"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":143,"ins":{"up_context":[{"change":4,"pos":46091}],"down_context":[{"change":4,"pos":46146}],"flag":"BLOCK","start":87989,"end":88028,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46091},"to":{"change":4,"start":46091,"end":46146},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" BillableId ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88004"}},{"Add":{"text":" Billable currency ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88027"}}],"del_contents":[{"Del":{"text":" SubscriptionId ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46110"}},{"Del":{"text":" Subscription' UserId Billable ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46145"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":146,"ins":{"up_context":[{"change":4,"pos":46157}],"down_context":[{"change":5,"pos":4339}],"flag":"BLOCK","start":88029,"end":88451,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46157},"to":{"change":4,"start":46157,"end":46178},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":46178},"to":{"change":5,"start":3049,"end":3096},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10233},"to":{"change":5,"start":3049,"end":3096},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3096},"to":{"change":4,"start":46179,"end":46192},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":8240},"to":{"change":5,"start":946,"end":1016},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":46192},"to":{"change":5,"start":946,"end":1016},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13427},"to":{"change":5,"start":946,"end":1016},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1016},"to":{"change":4,"start":46193,"end":46316},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":46316},"to":{"change":5,"start":3260,"end":3301},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3260},"to":{"change":5,"start":3260,"end":3301},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3301},"to":{"change":5,"start":10377,"end":10455},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10377},"to":{"change":5,"start":10377,"end":10455},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10455},"to":{"change":4,"start":46317,"end":46461},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":46461},"to":{"change":5,"start":3302,"end":3373},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10604},"to":{"change":5,"start":3302,"end":3373},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" m (PaymentRequestId, PaymentRequestDetail currency)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88082"}},{"Add":{"text":"createPaymentRequest ops now billId bill bday = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88133"}},{"Add":{"text":" nativeReq <- newPaymentRequest ops bill bday now","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88184"}},{"Add":{"text":" let req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88196"}},{"Add":{"text":" PaymentRequest","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88219"}},{"Add":{"text":" { _billable = (Const billId),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88259"}},{"Add":{"text":" _createdAt = now,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88289"}},{"Add":{"text":" _billingDate = bday,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88322"}},{"Add":{"text":" _nativeRequest = nativeReq","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88361"}},{"Add":{"text":" }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88373"}},{"Add":{"text":" reqId <- storePaymentRequest req","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88408"}},{"Add":{"text":" pure (reqId, req & PT.billable .~ bill)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88450"}}],"del_contents":[{"Del":{"text":" m PaymentRequestId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46177"}},{"Del":{"text":"createPaymentRequest ops now sid sub bday = do","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3095"}},{"Del":{"text":" cfg <- ask","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46191"}},{"Del":{"text":" -- TODO: maybe make pkey a function of subscription, billable, bday","pos":"WZFQDWW4XK6M4A4PQ7WQJUTZUPRGQR7V7ZVZY5ZTL5AMGIFMHB2QC:1015"}},{"Del":{"text":" pkey <- PaymentKey . encodeBase58Check <$> getRandomBytes 32","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46255"}},{"Del":{"text":" memo <- memoGen ops sub bday now","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46290"}},{"Del":{"text":" uri <- uriGen ops pkey","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46315"}},{"Del":{"text":" payload <- payloadGen ops sub bday now","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3300"}},{"Del":{"text":" details <- createPaymentDetails bday now memo uri payload (sub ^. billable)","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:10454"}},{"Del":{"text":" reqErr <- B.createPaymentRequest (cfg ^. signingKey) (cfg ^. pkiData) details","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46396"}},{"Del":{"text":" req <- either (throwError . review _SigningError) pure reqErr","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46460"}},{"Del":{"text":" liftdb $ CreatePaymentRequest (PaymentRequest sid req pkey now bday)","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3372"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":164,"ins":{"up_context":[{"change":4,"pos":46483}],"down_context":[{"change":4,"pos":46534}],"flag":"BLOCK","start":88452,"end":88469,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46483},"to":{"change":4,"start":46483,"end":46534},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" (MonadDB m) =>","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88468"}}],"del_contents":[{"Del":{"text":" (MonadDB m, MonadError e m, AsPaymentError e) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46533"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":167,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46624},"to":{"change":4,"start":46624,"end":46638},"introduced_by":4}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":" Billable ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46637"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":168,"ins":{"up_context":[{"change":4,"pos":46683}],"down_context":[{"change":4,"pos":46725}],"flag":"BLOCK","start":88470,"end":88525,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46683},"to":{"change":4,"start":46683,"end":46725},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" [(PaymentRequestId, PT.SomePaymentRequestDetail)] ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88524"}}],"del_contents":[{"Del":{"text":" [(PaymentRequestId, PaymentRequest)] ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46724"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":172,"ins":{"up_context":[{"change":4,"pos":46847}],"down_context":[{"change":5,"pos":610}],"flag":"BLOCK","start":88526,"end":89277,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":46847},"to":{"change":4,"start":46847,"end":46859},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":46859},"to":{"change":5,"start":8632,"end":8686},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":8632},"to":{"change":5,"start":8632,"end":8686},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":8686},"to":{"change":5,"start":11373,"end":11421},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11373},"to":{"change":5,"start":11373,"end":11421},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11421},"to":{"change":4,"start":46860,"end":47250},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9008},"to":{"change":5,"start":4542,"end":4595},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":47250},"to":{"change":5,"start":4542,"end":4595},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11842},"to":{"change":5,"start":4542,"end":4595},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4595},"to":{"change":5,"start":11896,"end":11973},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":11896},"to":{"change":5,"start":11896,"end":11973},"introduced_by":5}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" ExceptT PaymentError m [T.Day]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88558"}},{"Add":{"text":"findUnbilledDates now (px@((reqId, SomePaymentRequest req) : ps)) (dx@(d : ds)) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88640"}},{"Add":{"text":" let rec = findUnbilledDates now","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88674"}},{"Add":{"text":" gracePeriod = req ^. PT.billable . B.gracePeriod","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88729"}},{"Add":{"text":" in case compare (req ^. billingDate) d of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88774"}},{"Add":{"text":" EQ ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88788"}},{"Add":{"text":" lift (getRequestStatus now reqId req) >>= \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88846"}},{"Add":{"text":" Expired r ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88871"}},{"Add":{"text":" if (now ^. _utctDay) > addDays gracePeriod (r ^. billingDate)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:88947"}},{"Add":{"text":" then throwError (review _Overdue reqId)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89003"}},{"Add":{"text":" else fmap (d :) $ rec px dx -- d will be rebilled","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89069"}},{"Add":{"text":" _ ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89086"}},{"Add":{"text":" rec ps ds -- if paid or unpaid, nothing to do, keep looking","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89160"}},{"Add":{"text":" GT ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89174"}},{"Add":{"text":" fmap (d :) $ rec px ds","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89207"}},{"Add":{"text":" LT ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89221"}},{"Add":{"text":" rec ps dx","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89241"}},{"Add":{"text":"findUnbilledDates _ _ ds = pure ds","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89276"}}],"del_contents":[{"Del":{"text":" m [T.Day]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46858"}},{"Del":{"text":"findUnbilledDates now b (px@(p : ps)) (dx@(d : ds)) =","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:8685"}},{"Del":{"text":" case compare (view (_2 . billingDate) p) d of","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:11420"}},{"Del":{"text":" EQ ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46869"}},{"Del":{"text":" getRequestStatus now p >>= \\s -> case s of","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46918"}},{"Del":{"text":" Expired r ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:46939"}},{"Del":{"text":" if view _utctDay now > addDays (view gracePeriod b) (view billingDate r)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47022"}},{"Del":{"text":" then throwError (review _Overdue (r ^. subscription))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47088"}},{"Del":{"text":" else fmap (d :) $ findUnbilledDates now b px dx -- d will be rebilled","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47170"}},{"Del":{"text":" _ -> findUnbilledDates now b ps ds -- if paid or unpaid, nothing to do","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47249"}},{"Del":{"text":" GT -> fmap (d :) $ findUnbilledDates now b px ds","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4594"}},{"Del":{"text":" LT -> findUnbilledDates now b ps dx","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:11935"}},{"Del":{"text":"findUnbilledDates _ _ _ ds = pure ds","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:11972"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":195,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":47271}],"down_context":[{"change":4,"pos":47271}],"flag":"BLOCK","start":89278,"end":89292,"inode":{"change":5,"pos":5686}}},"contents":[{"Add":{"text":" forall c m.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89291"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":199,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":47370}],"down_context":[{"change":4,"pos":47370}],"flag":"BLOCK","start":89293,"end":89315,"inode":{"change":5,"pos":5686}}},"contents":[{"Add":{"text":" PaymentRequestId ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89314"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":201,"ins":{"up_context":[{"change":4,"pos":47417}],"down_context":[{"change":5,"pos":13890}],"flag":"BLOCK","start":89316,"end":89684,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":47417},"to":{"change":4,"start":47417,"end":47482},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9236},"to":{"change":5,"start":4629,"end":4665},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":47482},"to":{"change":5,"start":4629,"end":4665},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12397},"to":{"change":5,"start":4629,"end":4665},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4665},"to":{"change":5,"start":5137,"end":5206},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5206},"to":{"change":4,"start":47483,"end":47543},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" PaymentRequestDetail c ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89343"}},{"Add":{"text":" m (PaymentRequestStatus c)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89372"}},{"Add":{"text":"getRequestStatus now reqid req =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89405"}},{"Add":{"text":" let ifUnpaid = if isExpired now req then Expired req else Unpaid req","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89476"}},{"Add":{"text":" findPayment' = case paymentRequestCurrency req of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89532"}},{"Add":{"text":" (Currency' BTC) -> findPayment BTC reqid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89581"}},{"Add":{"text":" (Currency' ZEC) -> findPayment ZEC reqid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89630"}},{"Add":{"text":" in maybe ifUnpaid Paid <$> runMaybeT findPayment'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89683"}}],"del_contents":[{"Del":{"text":" (PaymentRequestId, PaymentRequest) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47456"}},{"Del":{"text":" m PaymentRequestStatus","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47481"}},{"Del":{"text":"getRequestStatus now (reqid, req) =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4664"}},{"Del":{"text":" let ifUnpaid = (if isExpired now req then Expired else Unpaid) req","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:5205"}},{"Del":{"text":" in maybe ifUnpaid Paid <$> runMaybeT (findPayment reqid)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47542"}}]}},{"Edit":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":210,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13891},"to":{"change":5,"start":12574,"end":12639},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12639},"to":{"change":4,"start":47544,"end":47985},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28354},"to":{"change":5,"start":13150,"end":13342},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":47985},"to":{"change":5,"start":13150,"end":13342},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14318},"to":{"change":5,"start":13150,"end":13342},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":13342},"to":{"change":5,"start":9334,"end":9444},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9444},"to":{"change":5,"start":14551,"end":14564},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13434},"to":{"change":5,"start":14551,"end":14564},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14551},"to":{"change":5,"start":14551,"end":14564},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14564},"to":{"change":4,"start":47986,"end":48223},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9824},"to":{"change":5,"start":14659,"end":14660},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":13627},"to":{"change":5,"start":14659,"end":14660},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48223},"to":{"change":5,"start":14659,"end":14660},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14659},"to":{"change":5,"start":14659,"end":14660},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14660},"to":{"change":4,"start":48224,"end":48364},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28537},"to":{"change":5,"start":14736,"end":14769},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48364},"to":{"change":5,"start":14736,"end":14769},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14736},"to":{"change":5,"start":14736,"end":14769},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14769},"to":{"change":5,"start":4860,"end":4874},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4874},"to":{"change":5,"start":14784,"end":14820},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14784},"to":{"change":5,"start":14784,"end":14820},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14820},"to":{"change":4,"start":48365,"end":48438},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48438},"to":{"change":5,"start":14894,"end":14994},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14894},"to":{"change":5,"start":14894,"end":14994},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":14994},"to":{"change":4,"start":48439,"end":48598},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28697},"to":{"change":5,"start":4875,"end":4906},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48598},"to":{"change":5,"start":4875,"end":4906},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15089},"to":{"change":5,"start":4875,"end":4906},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4906},"to":{"change":5,"start":28698,"end":28772},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28772},"to":{"change":5,"start":15174,"end":15253},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15174},"to":{"change":5,"start":15174,"end":15253},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15253},"to":{"change":4,"start":48599,"end":48667},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48667},"to":{"change":5,"start":15322,"end":15323},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15322},"to":{"change":5,"start":15322,"end":15323},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15323},"to":{"change":4,"start":48668,"end":48821},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48821},"to":{"change":5,"start":28926,"end":28998},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":28926},"to":{"change":5,"start":28926,"end":28998},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":4965},"to":{"change":5,"start":15471,"end":15513},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":28998},"to":{"change":5,"start":15471,"end":15513},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15471},"to":{"change":5,"start":15471,"end":15513},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6086},"to":{"change":5,"start":28999,"end":29096},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":29097},"to":{"change":5,"start":30317,"end":30397},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6086},"to":{"change":5,"start":30317,"end":30397},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":30397},"to":{"change":5,"start":3031,"end":3073},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3073},"to":{"change":5,"start":29155,"end":29228},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":29155},"to":{"change":5,"start":29155,"end":29228},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":29228},"to":{"change":4,"start":48822,"end":48877},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48877},"to":{"change":5,"start":15734,"end":15858},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6288},"to":{"change":5,"start":15734,"end":15858},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":855},"to":{"change":5,"start":855,"end":856},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":856},"to":{"change":5,"start":15859,"end":15982},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":15982},"to":{"change":5,"start":5207,"end":5208},"introduced_by":5}],"inode":{"change":5,"pos":5686}}},"contents":[{"Del":{"text":"{- Create the PaymentDetails section of the payment request.","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:12634"}},{"Del":{"text":" -}","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:12638"}},{"Del":{"text":"createPaymentDetails ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47567"}},{"Del":{"text":" ( MonadRandom m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47586"}},{"Del":{"text":" MonadReader r m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47607"}},{"Del":{"text":" HasPaymentsConfig r,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47632"}},{"Del":{"text":" MonadError e m,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47652"}},{"Del":{"text":" AsPaymentError e,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47674"}},{"Del":{"text":" MonadDB m","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47688"}},{"Del":{"text":" ) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47695"}},{"Del":{"text":" -- | payout date (billing date)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47729"}},{"Del":{"text":" T.Day ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47740"}},{"Del":{"text":" -- | timestamp of payment request creation","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47785"}},{"Del":{"text":" C.UTCTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47800"}},{"Del":{"text":" -- | user memo","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47817"}},{"Del":{"text":" Maybe Text ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47833"}},{"Del":{"text":" -- | payment response URL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47861"}},{"Del":{"text":" Maybe URI ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47876"}},{"Del":{"text":" -- | merchant payload","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47900"}},{"Del":{"text":" Maybe ByteString ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47922"}},{"Del":{"text":" -- | billing information","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47949"}},{"Del":{"text":" Billable ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47963"}},{"Del":{"text":" m P.PaymentDetails","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47984"}},{"Del":{"text":"createPaymentDetails payoutDate billingTime memo uri payload b = do","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:13217"}},{"Del":{"text":" payouts <- getProjectPayouts payoutTime (b ^. project)","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:13274"}},{"Del":{"text":" outputs <- createPayoutsOutputs payoutTime (b ^. amount) payouts","pos":"SEWTRB6S5PO5MQBLCPVBD7XT2BDYNZUE2RO6Z2XENZRIOCN6OZJAC:13341"}},{"Del":{"text":" let expiry =","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:9348"}},{"Del":{"text":" (BT.Expiry . T.fromThyme . (billingTime .+^))","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:9402"}},{"Del":{"text":" <$> (b ^. requestExpiryPeriod)","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:9443"}},{"Del":{"text":" cfg <- ask","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14563"}},{"Del":{"text":" pure $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:47994"}},{"Del":{"text":" B.createPaymentDetails","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48021"}},{"Del":{"text":" (toNetwork (cfg ^. networkMode) BTC)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48064"}},{"Del":{"text":" outputs","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48078"}},{"Del":{"text":" (T.fromThyme billingTime)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48110"}},{"Del":{"text":" expiry","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48123"}},{"Del":{"text":" memo","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48134"}},{"Del":{"text":" uri","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48144"}},{"Del":{"text":" payload","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48158"}},{"Del":{"text":" where","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48166"}},{"Del":{"text":" payoutTime = T.mkUTCTime payoutDate (fromInteger 0)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48222"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14659"}},{"Del":{"text":"getProjectPayouts ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48244"}},{"Del":{"text":" (MonadDB m, MonadError e m, AsPaymentError e) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48295"}},{"Del":{"text":" C.UTCTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48310"}},{"Del":{"text":" ProjectId ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48325"}},{"Del":{"text":" m (TL.Payouts (NetworkId, Address))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48363"}},{"Del":{"text":"getProjectPayouts ptime pid = do","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14768"}},{"Del":{"text":" project' <-","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4873"}},{"Del":{"text":" let projectOp = FindProject pid","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14819"}},{"Del":{"text":" in maybe (raiseSubjectNotFound projectOp) pure =<< liftdb projectOp","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48437"}},{"Del":{"text":" widx <- liftdb $ ReadWorkIndex pid","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14930"}},{"Del":{"text":" pure $ TL.payouts (TL.toDepF $ project' ^. depf) ptime widx","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14992"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:14993"}},{"Del":{"text":"createPayoutsOutputs ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48462"}},{"Del":{"text":" (MonadDB m, MonadError e m, AsPaymentError e) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48513"}},{"Del":{"text":" C.UTCTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48528"}},{"Del":{"text":" BT.Satoshi ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48544"}},{"Del":{"text":" TL.Payouts (NetworkId, Address) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48581"}},{"Del":{"text":" m [BT.Output]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48597"}},{"Del":{"text":"createPayoutsOutputs t amt p =","pos":"JFOEOFGA4CQR2LW43IVQGDZSPVJAD4KDN2DZMZXGM2QDIUD7AVCAC:4905"}},{"Del":{"text":" let payoutFractions :: [(TL.CreditTo (NetworkId, Address), BT.Satoshi)]","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:28771"}},{"Del":{"text":" payoutFractions = (_2 %~ outputAmount amt) <$> assocs (p ^. TL._Payouts)","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15252"}},{"Del":{"text":" in join <$> traverse (uncurry (createOutputs t)) payoutFractions","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48666"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15322"}},{"Del":{"text":"createOutputs ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48684"}},{"Del":{"text":" (MonadDB m, MonadError e m, AsPaymentError e) =>","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48735"}},{"Del":{"text":" C.UTCTime ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48750"}},{"Del":{"text":" TL.CreditTo (NetworkId, Address) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48788"}},{"Del":{"text":" BT.Satoshi ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48804"}},{"Del":{"text":" m [BT.Output]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48820"}},{"Del":{"text":"createOutputs _ (TL.CreditToCurrency (BTC, (PubKeyAddress addr))) amt =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:28997"}},{"Del":{"text":" pure $ [BT.Output amt (PayPKHash addr)]","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15512"}},{"Del":{"text":"createOutputs _ (TL.CreditToCurrency (_, other)) _ =","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:29051"}},{"Del":{"text":" throwError $ review _IllegalAddress other","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:29095"}},{"Del":{"text":"createOutputs _ (TL.CreditToUser uid) amt = (fmap maybeToList) . runMaybeT $ do","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:30396"}},{"Del":{"text":" (_, addr) <- findUserPaymentAddress uid","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:3072"}},{"Del":{"text":" case addr of","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:29169"}},{"Del":{"text":" PubKeyAddress a -> pure $ BT.Output amt (PayPKHash a)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:29227"}},{"Del":{"text":" other -> throwError $ review _IllegalAddress other","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48876"}},{"Del":{"text":"createOutputs t (TL.CreditToProject pid) amt = do","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15783"}},{"Del":{"text":" payouts <- getProjectPayouts t pid","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15820"}},{"Del":{"text":" createPayoutsOutputs t amt payouts","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15857"}},{"Del":{"text":"","pos":"QADKFHAR3KWQCNYU25Z7PJUGMD5WL26IU3DOAHBTRN2A7NKPUPKAC:855"}},{"Del":{"text":"outputAmount :: BT.Satoshi -> Rational -> BT.Satoshi","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15911"}},{"Del":{"text":"outputAmount i r = BT.Satoshi . round $ toRational (i ^. satoshi) * r","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:15981"}},{"Del":{"text":"","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:5207"}}]}},{"Replacement":{"inode":{"change":5,"pos":5686},"path":"lib/Aftok/Payments.hs","line":211,"ins":{"up_context":[{"change":4,"pos":48901}],"down_context":[],"flag":"BLOCK","start":89685,"end":90033,"inode":{"change":5,"pos":5686}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":48901},"to":{"change":4,"start":48901,"end":48974},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":9987},"to":{"change":5,"start":5302,"end":5367},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":48974},"to":{"change":5,"start":5302,"end":5367},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5302},"to":{"change":5,"start":5302,"end":5367},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5367},"to":{"change":5,"start":9988,"end":10076},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10076},"to":{"change":4,"start":48975,"end":49165},"introduced_by":4}],"inode":{"change":5,"pos":5686}},"ins_contents":[{"Add":{"text":" (MonadDB m) => UserId -> SubscriptionId -> m [(PaymentRequestId, PT.SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89781"}},{"Add":{"text":"findPayableRequests uid sid = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89814"}},{"Add":{"text":" subMay <- liftdb (FindSubscription sid)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89856"}},{"Add":{"text":" when (maybe True (\\s -> s ^. B.customer /= uid) subMay) $","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89916"}},{"Add":{"text":" void (raiseOpForbidden uid (UserNotSubscriber sid) (FindSubscription sid))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:89995"}},{"Add":{"text":" findSubscriptionUnpaidRequests sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90032"}}],"del_contents":[{"Del":{"text":" (MonadDB m) => UserId -> SubscriptionId -> C.UTCTime -> m [BillDetail]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48973"}},{"Del":{"text":"findPayableRequests uid sid now = do","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:5338"}},{"Del":{"text":" requests <- liftdb findOp","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:5366"}},{"Del":{"text":" join","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:9994"}},{"Del":{"text":" <$> (traverse checkAccess $ filter (not . isExpired now . view _2) requests)","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:10075"}},{"Del":{"text":" where","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:48982"}},{"Del":{"text":" findOp = FindUnpaidRequests sid","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:49018"}},{"Del":{"text":" checkAccess d =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:49038"}},{"Del":{"text":" if view (_3 . customer) d == uid","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:49077"}},{"Del":{"text":" then pure [d]","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:49099"}},{"Del":{"text":" else raiseOpForbidden uid (UserNotSubscriber sid) findOp","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:49164"}}]}},{"Replacement":{"inode":{"change":5,"pos":1031},"path":"lib/Aftok/Project.hs","line":37,"ins":{"up_context":[{"change":5,"pos":1850}],"down_context":[{"change":5,"pos":1903}],"flag":"BLOCK","start":90035,"end":90086,"inode":{"change":5,"pos":1031}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1850},"to":{"change":5,"start":1850,"end":1903},"introduced_by":5}],"inode":{"change":5,"pos":1031}},"ins_contents":[{"Add":{"text":"parseInvCode :: Text -> Either Text InvitationCode","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90085"}}],"del_contents":[{"Del":{"text":"parseInvCode :: Text -> Either String InvitationCode","pos":"HALRDT2F22DAQ54M334YSKD2XJCAXDXEZPDKGMOWKH7XELBAS6MAC:1902"}}]}},{"Replacement":{"inode":{"change":5,"pos":1031},"path":"lib/Aftok/Project.hs","line":39,"ins":{"up_context":[{"change":5,"pos":1923}],"down_context":[{"change":5,"pos":3938}],"flag":"BLOCK","start":90087,"end":90131,"inode":{"change":5,"pos":1031}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1923},"to":{"change":5,"start":1923,"end":1961},"introduced_by":5}],"inode":{"change":5,"pos":1031}},"ins_contents":[{"Add":{"text":" code <- B64.decodeBase64 . encodeUtf8 $ t","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90130"}}],"del_contents":[{"Del":{"text":" code <- B64.decode . encodeUtf8 $ t","pos":"HALRDT2F22DAQ54M334YSKD2XJCAXDXEZPDKGMOWKH7XELBAS6MAC:1960"}}]}},{"Replacement":{"inode":{"change":5,"pos":1031},"path":"lib/Aftok/Project.hs","line":45,"ins":{"up_context":[{"change":5,"pos":2117}],"down_context":[{"change":5,"pos":2180}],"flag":"BLOCK","start":90132,"end":90188,"inode":{"change":5,"pos":1031}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2117},"to":{"change":5,"start":2117,"end":2180},"introduced_by":5}],"inode":{"change":5,"pos":1031}},"ins_contents":[{"Add":{"text":"renderInvCode (InvitationCode bs) = B64.encodeBase64 bs","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90187"}}],"del_contents":[{"Del":{"text":"renderInvCode (InvitationCode bs) = decodeUtf8 $ B64.encode bs","pos":"HALRDT2F22DAQ54M334YSKD2XJCAXDXEZPDKGMOWKH7XELBAS6MAC:2179"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":10,"ins":{"up_context":[{"change":4,"pos":50487}],"down_context":[{"change":4,"pos":50510}],"flag":"BLOCK","start":90190,"end":90212,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":50487},"to":{"change":4,"start":50487,"end":50510},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":" _CreditToAccount,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90211"}}],"del_contents":[{"Del":{"text":" _CreditToCurrency,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:50509"}}]}},{"Edit":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":13,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":50551},"to":{"change":4,"start":50551,"end":50569},"introduced_by":4}],"inode":{"change":5,"pos":846}}},"contents":[{"Del":{"text":" creditToName,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:50568"}}]}},{"Edit":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":31,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":50893}],"down_context":[{"change":4,"pos":50893}],"flag":"BLOCK","start":90213,"end":90236,"inode":{"change":5,"pos":846}}},"contents":[{"Add":{"text":" FractionalPayouts,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90235"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":100,"ins":{"up_context":[{"change":5,"pos":1627}],"down_context":[{"change":5,"pos":431}],"flag":"BLOCK","start":90237,"end":90307,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1627},"to":{"change":5,"start":1627,"end":1661},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1661},"to":{"change":4,"start":52170,"end":52202},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"eventName = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90254"}},{"Add":{"text":" (StartWork _) -> \"start\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90281"}},{"Add":{"text":" (StopWork _) -> \"stop\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90306"}}],"del_contents":[{"Del":{"text":"eventName (StartWork _) = \"start\"","pos":"KNSI575VAW6HRCZYXOEPQ4DTSML4EORML5MV4DJBRKE7TXCPS4EAC:1660"}},{"Del":{"text":"eventName (StopWork _) = \"stop\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52201"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":105,"ins":{"up_context":[{"change":5,"pos":31604}],"down_context":[{"change":5,"pos":5441}],"flag":"BLOCK","start":90308,"end":90395,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":31604},"to":{"change":5,"start":31604,"end":31639},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":31639},"to":{"change":4,"start":52203,"end":52258},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"nameEvent = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90325"}},{"Add":{"text":" \"start\" -> Just StartWork","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90353"}},{"Add":{"text":" \"stop\" -> Just StopWork","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90379"}},{"Add":{"text":" _ -> Nothing","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90394"}}],"del_contents":[{"Del":{"text":"nameEvent \"start\" = Just StartWork","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:31638"}},{"Del":{"text":"nameEvent \"stop\" = Just StopWork","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52235"}},{"Del":{"text":"nameEvent _ = Nothing","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52257"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":110,"ins":{"up_context":[{"change":5,"pos":5442}],"down_context":[{"change":4,"pos":52275}],"flag":"BLOCK","start":90396,"end":90410,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5442},"to":{"change":4,"start":52259,"end":52275},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"data LogEntry","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90409"}}],"del_contents":[{"Del":{"text":"data LogEntry a","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52274"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":112,"ins":{"up_context":[{"change":4,"pos":52288}],"down_context":[{"change":4,"pos":52324}],"flag":"BLOCK","start":90411,"end":90443,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":52288},"to":{"change":4,"start":52288,"end":52324},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":" { _creditTo :: !CreditTo,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90442"}}],"del_contents":[{"Del":{"text":" { _creditTo :: !(CreditTo a),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52323"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":120,"ins":{"up_context":[{"change":5,"pos":214}],"down_context":[{"change":5,"pos":4775}],"flag":"BLOCK","start":90444,"end":90472,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":214},"to":{"change":5,"start":31762,"end":31803},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"instance Ord LogEntry where","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90471"}}],"del_contents":[{"Del":{"text":"instance Ord a => Ord (LogEntry a) where","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:31802"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":133,"ins":{"up_context":[{"change":5,"pos":5813}],"down_context":[{"change":5,"pos":31826}],"flag":"BLOCK","start":90473,"end":90493,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5813},"to":{"change":5,"start":31804,"end":31826},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"data EventAmendment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90492"}}],"del_contents":[{"Del":{"text":"data EventAmendment a","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:31825"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":135,"ins":{"up_context":[{"change":5,"pos":31861}],"down_context":[{"change":5,"pos":31903}],"flag":"BLOCK","start":90494,"end":90532,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":31861},"to":{"change":5,"start":31861,"end":31903},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":" | CreditToChange !ModTime !CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90531"}}],"del_contents":[{"Del":{"text":" | CreditToChange !ModTime !(CreditTo a)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:31902"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":142,"ins":{"up_context":[{"change":5,"pos":5971}],"down_context":[{"change":4,"pos":52471}],"flag":"BLOCK","start":90533,"end":90578,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5971},"to":{"change":5,"start":31941,"end":31997},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"newtype Payouts a = Payouts (Map CreditTo a)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90577"}}],"del_contents":[{"Del":{"text":"newtype Payouts a = Payouts (Map (CreditTo a) Rational)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:31996"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":146,"ins":{"up_context":[{"change":5,"pos":6043}],"down_context":[{"change":4,"pos":52473}],"flag":"BLOCK","start":90579,"end":90707,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6043},"to":{"change":5,"start":31998,"end":32089},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"type FractionalPayouts = Payouts Rational","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90620"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90621"}},{"Add":{"text":"newtype WorkIndex = WorkIndex (Map CreditTo (NonEmpty Interval)) deriving (Show, Eq)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90706"}}],"del_contents":[{"Del":{"text":"newtype WorkIndex a = WorkIndex (Map (CreditTo a) (NonEmpty Interval)) deriving (Show, Eq)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:32088"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":165,"ins":{"up_context":[{"change":4,"pos":52814}],"down_context":[{"change":5,"pos":4834}],"flag":"BLOCK","start":90708,"end":90816,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":52814},"to":{"change":4,"start":52814,"end":52851},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":52851},"to":{"change":5,"start":32090,"end":32156},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1766},"to":{"change":5,"start":32090,"end":32156},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"-- - work allocated to each unique CreditTo.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90752"}},{"Add":{"text":"payouts :: DepF -> C.UTCTime -> WorkIndex -> FractionalPayouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90815"}}],"del_contents":[{"Del":{"text":"-- - work allocated to each address.","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:52850"}},{"Del":{"text":"payouts :: Ord a => DepF -> C.UTCTime -> WorkIndex a -> Payouts a","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:32155"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":174,"ins":{"up_context":[{"change":5,"pos":1582}],"down_context":[{"change":5,"pos":4957}],"flag":"BLOCK","start":90817,"end":90868,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1582},"to":{"change":4,"start":52978,"end":53058},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"workIndex :: Foldable f => f LogEntry -> WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90867"}}],"del_contents":[{"Del":{"text":"workIndex :: forall a f. (Ord a, Foldable f) => f (LogEntry a) -> (WorkIndex a)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:53057"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":179,"ins":{"up_context":[{"change":4,"pos":53138}],"down_context":[{"change":4,"pos":53162}],"flag":"BLOCK","start":90869,"end":90889,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":53138},"to":{"change":4,"start":53138,"end":53162},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":" CreditTo ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90888"}}],"del_contents":[{"Del":{"text":" (CreditTo a) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:53161"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":181,"ins":{"up_context":[{"change":4,"pos":53200}],"down_context":[{"change":5,"pos":4981}],"flag":"BLOCK","start":90890,"end":90975,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":53200},"to":{"change":4,"start":53200,"end":53293},"introduced_by":4}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":" Map CreditTo (NonEmpty Interval) ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90933"}},{"Add":{"text":" Map CreditTo (NonEmpty Interval)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:90974"}}],"del_contents":[{"Del":{"text":" Map (CreditTo a) (NonEmpty Interval) ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:53247"}},{"Del":{"text":" Map (CreditTo a) (NonEmpty Interval)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:53292"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":192,"ins":{"up_context":[{"change":4,"pos":53573}],"down_context":[{"change":5,"pos":2169}],"flag":"BLOCK","start":90976,"end":91032,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":53573},"to":{"change":5,"start":32226,"end":32288},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2114},"to":{"change":5,"start":32226,"end":32288},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"type RawIndex = Map CreditTo [Either LogEvent Interval]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91031"}}],"del_contents":[{"Del":{"text":"type RawIndex a = Map (CreditTo a) [Either LogEvent Interval]","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:32287"}}]}},{"Replacement":{"inode":{"change":5,"pos":846},"path":"lib/Aftok/TimeLog.hs","line":194,"ins":{"up_context":[{"change":5,"pos":2170}],"down_context":[{"change":5,"pos":5030}],"flag":"BLOCK","start":91033,"end":91084,"inode":{"change":5,"pos":846}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2170},"to":{"change":5,"start":32289,"end":32357},"introduced_by":5}],"inode":{"change":5,"pos":846}},"ins_contents":[{"Add":{"text":"appendLogEntry :: RawIndex -> LogEntry -> RawIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91083"}}],"del_contents":[{"Del":{"text":"appendLogEntry :: (Ord a) => RawIndex a -> LogEntry a -> RawIndex a","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:32356"}}]}},{"Edit":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":1,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":805},"to":{"change":4,"start":54482,"end":54513},"introduced_by":4}],"inode":{"change":5,"pos":805}}},"contents":[{"Del":{"text":"{-# LANGUAGE DeriveFunctor #-}","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:54512"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":5,"ins":{"up_context":[{"change":5,"pos":32940}],"down_context":[{"change":4,"pos":54583}],"flag":"BLOCK","start":91086,"end":91139,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":32940},"to":{"change":4,"start":54547,"end":54583},"introduced_by":4}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Currency.Zcash.Types as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91138"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Zcash (ZAddr)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:54582"}}]}},{"Edit":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":11,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":54659},"to":{"change":4,"start":54659,"end":54689},"introduced_by":4}],"inode":{"change":5,"pos":805}}},"contents":[{"Del":{"text":"import Data.Functor (Functor)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:54688"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":29,"ins":{"up_context":[{"change":5,"pos":33159}],"down_context":[{"change":5,"pos":3238}],"flag":"BLOCK","start":91140,"end":91157,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":33159},"to":{"change":5,"start":3947,"end":3970},"introduced_by":5}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":"data RecoverBy z","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91156"}}],"del_contents":[{"Del":{"text":"data AccountRecovery z","pos":"5IDB3IWSB6LFW4U772Y7BH5Y3FQOQ7IFWLVXDZE5XS6SKJITFV4QC:3969"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":33,"ins":{"up_context":[{"change":4,"pos":54816}],"down_context":[{"change":4,"pos":54817}],"flag":"BLOCK","start":91158,"end":91181,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":3992},"to":{"change":5,"start":3288,"end":3317},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":54816},"to":{"change":5,"start":3288,"end":3317},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3288},"to":{"change":5,"start":3288,"end":3317},"introduced_by":5}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":"makePrisms ''RecoverBy","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91180"}}],"del_contents":[{"Del":{"text":"makePrisms ''AccountRecovery","pos":"U256ZALIPTVWLNACYPIMWLNEYDQWP7CHF4Y4CGMILQTONJHMGQVQC:3316"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":38,"ins":{"up_context":[{"change":4,"pos":54869}],"down_context":[{"change":4,"pos":54926}],"flag":"BLOCK","start":91182,"end":91241,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":54869},"to":{"change":4,"start":54869,"end":54926},"introduced_by":4}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":" _userAccountRecovery :: !(RecoverBy Zcash.Address)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91240"}}],"del_contents":[{"Del":{"text":" _userAccountRecovery :: !(AccountRecovery ZAddr)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:54925"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":47,"ins":{"up_context":[{"change":5,"pos":33373}],"down_context":[{"change":4,"pos":54937}],"flag":"BLOCK","start":91242,"end":91596,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":33373},"to":{"change":5,"start":33373,"end":33389},"introduced_by":5}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":"-- Identifier for a cryptocurrency account. An account","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91296"}},{"Add":{"text":"-- is a mapping from cryptocurrency network to address;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91352"}},{"Add":{"text":"-- this abstraction permits users to accept payment","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91404"}},{"Add":{"text":"-- in multiple currencies, or to direct payments in a","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91458"}},{"Add":{"text":"-- fashion that can change over time.","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91496"}},{"Add":{"text":"newtype AccountId = AccountId UUID deriving (Show, Eq, Ord)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91556"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91557"}},{"Add":{"text":"makePrisms ''AccountId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91580"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91581"}},{"Add":{"text":"data CreditTo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91595"}}],"del_contents":[{"Del":{"text":"data CreditTo a","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:33388"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":58,"ins":{"up_context":[{"change":4,"pos":54999}],"down_context":[{"change":4,"pos":55023}],"flag":"BLOCK","start":91597,"end":91628,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":54999},"to":{"change":4,"start":54999,"end":55023},"introduced_by":4}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":" CreditToAccount !AccountId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91627"}}],"del_contents":[{"Del":{"text":" CreditToCurrency !a","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:55022"}}]}},{"Replacement":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":63,"ins":{"up_context":[{"change":4,"pos":55214}],"down_context":[{"change":4,"pos":55215}],"flag":"BLOCK","start":91629,"end":91656,"inode":{"change":5,"pos":805}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":55214},"to":{"change":5,"start":33660,"end":33696},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":33660},"to":{"change":5,"start":33660,"end":33696},"introduced_by":5}],"inode":{"change":5,"pos":805}},"ins_contents":[{"Add":{"text":" deriving (Show, Eq, Ord)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91655"}}],"del_contents":[{"Del":{"text":" deriving (Show, Eq, Ord, Functor)","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:33695"}}]}},{"Edit":{"inode":{"change":5,"pos":805},"path":"lib/Aftok/Types.hs","line":67,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1037},"to":{"change":5,"start":33719,"end":33807},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":33807},"to":{"change":4,"start":55217,"end":55321},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":43434},"to":{"change":5,"start":33914,"end":33915},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":55321},"to":{"change":5,"start":33914,"end":33915},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":33914},"to":{"change":5,"start":33914,"end":33915},"introduced_by":5}],"inode":{"change":5,"pos":805}}},"contents":[{"Del":{"text":"creditToName :: CreditTo a -> Text","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:33753"}},{"Del":{"text":"creditToName (CreditToCurrency _) = \"credit_via_net\"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:33806"}},{"Del":{"text":"creditToName (CreditToUser _) = \"credit_to_user\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:55265"}},{"Del":{"text":"creditToName (CreditToProject _) = \"credit_to_project\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:55320"}},{"Del":{"text":"","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:33914"}}]}},{"Edit":{"inode":{"change":5,"pos":260},"path":"lib/Aftok/Util/Http.hs","line":6,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":55436}],"down_context":[{"change":5,"pos":4010}],"flag":"BLOCK","start":91659,"end":91685,"inode":{"change":5,"pos":260}}},"contents":[{"Add":{"text":"import Data.Text (unpack)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91684"}}]}},{"Replacement":{"inode":{"change":5,"pos":260},"path":"lib/Aftok/Util/Http.hs","line":18,"ins":{"up_context":[{"change":4,"pos":55489}],"down_context":[{"change":5,"pos":822}],"flag":"BLOCK","start":91686,"end":91750,"inode":{"change":5,"pos":260}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":5561},"to":{"change":5,"start":775,"end":822},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":55489},"to":{"change":5,"start":775,"end":822},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":775},"to":{"change":5,"start":775,"end":822},"introduced_by":5}],"inode":{"change":5,"pos":260}},"ins_contents":[{"Add":{"text":" decoded <- either (fail . unpack) pure $ B64.decodeBase64 b64","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91749"}}],"del_contents":[{"Del":{"text":" decoded <- either fail pure $ B64.decode b64","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:821"}}]}},{"FileAdd":{"meta":{"basename":"2020-11-25_04-22-24_zcash-support.txt","metadata":0},"context":[{"change":132,"pos":1}],"contents":[{"Add":{"text":"Description: (Describe migration here.)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91792"}},{"Add":{"text":"Created: 2020-11-25 04:24:09.873312342 UTC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:91835"}},{"Add":{"text":"Depends: 2020-06-06_03-53-54_add-payment-networks 2017-09-24_22-06-01_billing-templates 2017-06-08_04-37-31_event-metadata-ids 2016-12-31_03-45-17_create-payments 2016-10-14_02-49-36_event-amendments 2016-10-14_02-14-09_create_invitations 2016-10-14_02-11-24_project_companions_invitations 2016-10-13_05-36-55_user-event-log","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92160"}},{"Add":{"text":"Apply: |","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92169"}},{"Add":{"text":" CREATE TYPE currency_t AS ENUM ('ZEC', 'BTC');","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92218"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92219"}},{"Add":{"text":" ALTER TABLE work_events ALTER COLUMN credit_to_type DROP DEFAULT;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92287"}},{"Add":{"text":" ALTER TABLE work_events ALTER COLUMN credit_to_type TYPE VARCHAR(255);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92360"}},{"Add":{"text":" ALTER TABLE event_credit_to_amendments ALTER COLUMN credit_to_type TYPE VARCHAR(255);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92448"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92449"}},{"Add":{"text":" UPDATE work_events SET credit_to_type = 'credit_to_account' WHERE credit_to_type = 'credit_to_address';","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92555"}},{"Add":{"text":" UPDATE event_credit_to_amendments SET credit_to_type = 'credit_to_account' WHERE credit_to_type = 'credit_to_address';","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92676"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92677"}},{"Add":{"text":" DROP TYPE IF EXISTS credit_to_t;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92712"}},{"Add":{"text":" CREATE TYPE credit_to_t AS ENUM ('credit_to_account', 'credit_to_user', 'credit_to_project');","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92808"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92809"}},{"Add":{"text":" ALTER TABLE work_events ALTER COLUMN credit_to_type TYPE credit_to_t USING (credit_to_type::credit_to_t);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:92917"}},{"Add":{"text":" ALTER TABLE event_credit_to_amendments ALTER COLUMN credit_to_type TYPE credit_to_t USING (credit_to_type::credit_to_t);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93040"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93041"}},{"Add":{"text":" CREATE TABLE IF NOT EXISTS cryptocurrency_accounts (","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93096"}},{"Add":{"text":" id uuid primary key default uuid_generate_v4(),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93148"}},{"Add":{"text":" user_id uuid references users(id) not null,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93196"}},{"Add":{"text":" currency currency_t not null,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93230"}},{"Add":{"text":" is_primary bool,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93251"}},{"Add":{"text":" zcash_ivk text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93271"}},{"Add":{"text":" zcash_addr text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93292"}},{"Add":{"text":" btc_addr text,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93311"}},{"Add":{"text":" UNIQUE (user_id, currency, is_primary),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93355"}},{"Add":{"text":" CHECK ((currency = 'BTC' AND btc_addr IS NOT NULL) OR (currency = 'ZEC' AND zcash_ivk IS NOT NULL))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93459"}},{"Add":{"text":" );","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93464"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93465"}},{"Add":{"text":" INSERT INTO cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93503"}},{"Add":{"text":" (user_id, currency, btc_addr, is_primary)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93549"}},{"Add":{"text":" SELECT DISTINCT id, 'BTC'::currency_t, default_payment_addr, true FROM users","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93631"}},{"Add":{"text":" WHERE default_payment_addr IS NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93676"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93677"}},{"Add":{"text":" INSERT INTO cryptocurrency_accounts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93715"}},{"Add":{"text":" (user_id, currency, btc_addr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93749"}},{"Add":{"text":" SELECT DISTINCT user_id, 'BTC'::currency_t, credit_to_address FROM work_events","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93832"}},{"Add":{"text":" WHERE credit_to_address IS NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93873"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93874"}},{"Add":{"text":" ALTER TABLE work_events ADD COLUMN credit_to_account uuid REFERENCES cryptocurrency_accounts(id);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93974"}},{"Add":{"text":" UPDATE work_events ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:93996"}},{"Add":{"text":" SET credit_to_account = ca.id, credit_to_type = 'credit_to_account'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94068"}},{"Add":{"text":" FROM cryptocurrency_accounts ca","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94104"}},{"Add":{"text":" WHERE ca.user_id = work_events.user_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94147"}},{"Add":{"text":" AND credit_to_address = ca.btc_addr;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94188"}},{"Add":{"text":" ALTER TABLE work_events DROP COLUMN credit_to_address;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94245"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94246"}},{"Add":{"text":" ALTER TABLE event_credit_to_amendments ADD COLUMN credit_to_account uuid REFERENCES cryptocurrency_accounts(id);","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94361"}},{"Add":{"text":" UPDATE event_credit_to_amendments ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94398"}},{"Add":{"text":" SET credit_to_account = ca.id, credit_to_type = 'credit_to_account'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94470"}},{"Add":{"text":" FROM cryptocurrency_accounts ca","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94506"}},{"Add":{"text":" JOIN work_events w","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94529"}},{"Add":{"text":" ON ca.user_id = w.user_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94559"}},{"Add":{"text":" WHERE w.id = event_credit_to_amendments.event_id","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94612"}},{"Add":{"text":" AND event_credit_to_amendments.credit_to_address = ca.btc_addr;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94680"}},{"Add":{"text":" ALTER TABLE event_credit_to_amendments DROP COLUMN credit_to_address;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94752"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94753"}},{"Add":{"text":" ALTER TABLE billables ADD COLUMN billing_currency currency_t NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94826"}},{"Add":{"text":" ALTER TABLE billables ADD COLUMN message text;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94875"}},{"Add":{"text":" ALTER TABLE billables ADD COLUMN request_expiry_seconds integer NOT NULL DEFAULT 259200;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:94966"}},{"Add":{"text":" ALTER TABLE billables ALTER COLUMN billing_amount TYPE bigint;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95031"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95032"}},{"Add":{"text":" ALTER TABLE payment_requests ALTER COLUMN subscription_id DROP NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95107"}},{"Add":{"text":" ALTER TABLE payment_requests ALTER COLUMN url_key DROP NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95174"}},{"Add":{"text":" ALTER TABLE payment_requests ADD COLUMN request_json json NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95244"}},{"Add":{"text":" ALTER TABLE payment_requests DROP COLUMN request_data;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95301"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95302"}},{"Add":{"text":" ALTER TABLE payments ADD COLUMN payment_json json NOT NULL;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95364"}},{"Add":{"text":" ALTER TABLE payments DROP COLUMN payment_data;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95413"}}]}},{"FileAdd":{"meta":{"basename":"check_zaddr.sh","metadata":64},"context":[{"change":5,"pos":1220}],"contents":[{"Add":{"text":"#!/bin/bash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95491"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95492"}},{"Add":{"text":"if [ -f \".env\" ]; then","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95515"}},{"Add":{"text":" source .env","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95529"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95532"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95533"}},{"Add":{"text":"if [ -z \"${AFTOK_HOST}\" ]; then ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95566"}},{"Add":{"text":" AFTOK_HOST=\"aftok.com\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95591"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95594"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95595"}},{"Add":{"text":"read -p \"Zcash Address: \" ZADDR","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95627"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95628"}},{"Add":{"text":"curl --verbose \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95645"}},{"Add":{"text":" ${ALLOW_INSECURE} \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95667"}},{"Add":{"text":" \"https://$AFTOK_HOST/api/validate_zaddr?zaddr=${ZADDR}\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95725"}}]}},{"Replacement":{"inode":{"change":5,"pos":1241},"path":"scripts/create_project.sh","line":35,"ins":{"up_context":[{"change":5,"pos":104}],"down_context":[{"change":5,"pos":446}],"flag":"BLOCK","start":95768,"end":95870,"inode":{"change":5,"pos":1241}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":104},"to":{"change":5,"start":239,"end":341},"introduced_by":5}],"inode":{"change":5,"pos":1241}},"ins_contents":[{"Add":{"text":"curl --verbose \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95784"}},{"Add":{"text":" ${ALLOW_INSECURE} \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95806"}},{"Add":{"text":" --user $USER \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95823"}},{"Add":{"text":" --header \"Content-Type: application/json\" \\","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95869"}}],"del_contents":[{"Del":{"text":"curl --verbose --insecure --user $USER \\","pos":"UOG5H2TW5R3FSHQPJCEMNFDQZS5APZUP7OM54FIBQG7ZP4HASQ7QC:279"}},{"Del":{"text":" --request POST --header \"Content-Type: application/json\" \\","pos":"UOG5H2TW5R3FSHQPJCEMNFDQZS5APZUP7OM54FIBQG7ZP4HASQ7QC:340"}}]}},{"FileAdd":{"meta":{"basename":"create_project_billable.sh","metadata":64},"context":[{"change":5,"pos":1220}],"contents":[{"Add":{"text":"#!/bin/bash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95884"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95885"}},{"Add":{"text":"if [ -f \".env\" ]; then","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95908"}},{"Add":{"text":" source .env","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95922"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95925"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95926"}},{"Add":{"text":"if [ -z \"${AFTOK_HOST}\" ]; then ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95959"}},{"Add":{"text":" AFTOK_HOST=\"aftok.com\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95984"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95987"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:95988"}},{"Add":{"text":"if [ -z \"${USER}\" ]; then ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96015"}},{"Add":{"text":" read -p \"Username: \" USER","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96043"}},{"Add":{"text":" echo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96050"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96053"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96054"}},{"Add":{"text":"if [ -z \"${PID}\" ]; then","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96079"}},{"Add":{"text":" read -p \"Project UUID: \" PID","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96110"}},{"Add":{"text":" echo","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96117"}},{"Add":{"text":"fi","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96120"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96121"}},{"Add":{"text":"read -p \"Billable Name: \" BNAME","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96153"}},{"Add":{"text":"read -p \"Description: \" BDESC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96183"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96184"}},{"Add":{"text":"while [ -z \"${RECUR}\" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96208"}},{"Add":{"text":"do ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96212"}},{"Add":{"text":" read -p \"Recurrence Period [A|M|W|O] ((A)nnual, (M)onthly, (W)eekly, (O)ne-time): \" RECUR","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96304"}},{"Add":{"text":" case $RECUR in","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96321"}},{"Add":{"text":" \"A\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96330"}},{"Add":{"text":" RECUR=\"annually\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96353"}},{"Add":{"text":" read -p \"Recur every ? years: \" RECUR_COUNT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96403"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96412"}},{"Add":{"text":" \"M\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96421"}},{"Add":{"text":" RECUR=\"monthly\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96443"}},{"Add":{"text":" read -p \"Recur every ? months: \" RECUR_COUNT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96494"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96503"}},{"Add":{"text":" \"W\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96512"}},{"Add":{"text":" RECUR=\"weekly\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96533"}},{"Add":{"text":" read -p \"Recur every ? weeks: \" RECUR_COUNT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96583"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96592"}},{"Add":{"text":" \"O\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96601"}},{"Add":{"text":" RECUR=\"one-time\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96624"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96633"}},{"Add":{"text":" *)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96640"}},{"Add":{"text":" echo \"$RECUR is not a supported recurrence. Please choose \\\"A\\\" \\\"M\\\", \\\"W\\\" or \\\"O\\\"\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96733"}},{"Add":{"text":" RECUR=\"\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96748"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96757"}},{"Add":{"text":" esac","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96764"}},{"Add":{"text":"done","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96769"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96770"}},{"Add":{"text":"while [ -z \"${CURRENCY}\" ]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96797"}},{"Add":{"text":"do ","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96801"}},{"Add":{"text":" read -p \"Currency [BTC|ZEC]: \" CURRENCY","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96843"}},{"Add":{"text":" case $CURRENCY in","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96863"}},{"Add":{"text":" \"BTC\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96874"}},{"Add":{"text":" read -p \"Bill Total (in Satoshis): \" AMOUNT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96924"}},{"Add":{"text":" break","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96936"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96945"}},{"Add":{"text":" \"ZEC\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:96956"}},{"Add":{"text":" read -p \"Bill Total (in Zatoshis): \" AMOUNT","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97006"}},{"Add":{"text":" break","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97018"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97027"}},{"Add":{"text":" *)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97034"}},{"Add":{"text":" echo \"$CURRENCY is not a supported currency. Please choose \\\"BTC\\\" or \\\"ZEC\\\"\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97119"}},{"Add":{"text":" CURRENCY=\"\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97137"}},{"Add":{"text":" ;;","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97146"}},{"Add":{"text":" esac","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97153"}},{"Add":{"text":"done","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97158"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97159"}},{"Add":{"text":"read -p \"Grace Period (days): \" GRACE_PERIOD","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97204"}},{"Add":{"text":"read -p \"Request Expiry Period (seconds): \" REQUEST_EXPIRY","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97263"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:97264"}},{"Add":{"text":"BODY=$(cat < ProjectId -> Value -> Parser (Billable Amount)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100499"}}],"del_contents":[{"Del":{"text":"parseCreateBillable :: UserId -> ProjectId -> Value -> Parser Billable","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:34546"}}]}},{"Edit":{"inode":{"change":5,"pos":33730},"path":"server/Aftok/Snaplet/Billing.hs","line":34,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":60585}],"down_context":[{"change":4,"pos":60585}],"flag":"BLOCK","start":100501,"end":100669,"inode":{"change":5,"pos":33730}}},"contents":[{"Add":{"text":" amountParser = \\case","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100525"}},{"Add":{"text":" \"ZEC\" -> pure (Amount ZEC . Zatoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100568"}},{"Add":{"text":" \"BTC\" -> pure (Amount BTC . Satoshi)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100611"}},{"Add":{"text":" c -> fail (\"Currency \" <> c <> \" not recognized.\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100668"}}]}},{"Replacement":{"inode":{"change":5,"pos":33730},"path":"server/Aftok/Snaplet/Billing.hs","line":42,"ins":{"up_context":[{"change":4,"pos":60666}],"down_context":[{"change":4,"pos":60737}],"flag":"BLOCK","start":100670,"end":100758,"inode":{"change":5,"pos":33730}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":60666},"to":{"change":4,"start":60666,"end":60737},"introduced_by":4}],"inode":{"change":5,"pos":33730}},"ins_contents":[{"Add":{"text":" <*> (o .: \"name\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100695"}},{"Add":{"text":" <*> (o .: \"description\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100728"}},{"Add":{"text":" <*> (o .: \"message\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100757"}}],"del_contents":[{"Del":{"text":" <*> o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60679"}},{"Del":{"text":" .: \"name\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60697"}},{"Del":{"text":" <*> o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60711"}},{"Del":{"text":" .: \"description\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60736"}}]}},{"Replacement":{"inode":{"change":5,"pos":33730},"path":"server/Aftok/Snaplet/Billing.hs","line":46,"ins":{"up_context":[{"change":4,"pos":60790}],"down_context":[{"change":4,"pos":61038}],"flag":"BLOCK","start":100759,"end":101011,"inode":{"change":5,"pos":33730}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":60790},"to":{"change":4,"start":60790,"end":61038},"introduced_by":4}],"inode":{"change":5,"pos":33730}},"ins_contents":[{"Add":{"text":" <*> ((o .: \"currency\" >>= amountParser) <*> o .: \"amount\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100825"}},{"Add":{"text":" <*> (o .: \"gracePeriod\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100858"}},{"Add":{"text":" <*> (toThyme <$> o .: \"requestExpiryPeriod\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100911"}},{"Add":{"text":" <*> (o .:? \"paymentRequestEmailTemplate\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:100961"}},{"Add":{"text":" <*> (o .:? \"paymentRequestMemoTemplate\")","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101010"}}],"del_contents":[{"Del":{"text":" <*> (Satoshi <$> o .: \"amount\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60829"}},{"Del":{"text":" <*> o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60843"}},{"Del":{"text":" .: \"gracePeriod\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60868"}},{"Del":{"text":" <*> (fmap toThyme <$> o .: \"requestExpiryPeriod\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60926"}},{"Del":{"text":" <*> o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60940"}},{"Del":{"text":" .:? \"paymentRequestEmailTemplate\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60982"}},{"Del":{"text":" <*> o","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:60996"}},{"Del":{"text":" .:? \"paymentRequestMemoTemplate\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61037"}}]}},{"Replacement":{"inode":{"change":5,"pos":33730},"path":"server/Aftok/Snaplet/Billing.hs","line":63,"ins":{"up_context":[{"change":5,"pos":35393}],"down_context":[{"change":5,"pos":35459}],"flag":"BLOCK","start":101012,"end":101085,"inode":{"change":5,"pos":33730}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":35393},"to":{"change":5,"start":35393,"end":35459},"introduced_by":5}],"inode":{"change":5,"pos":33730}},"ins_contents":[{"Add":{"text":"billableListHandler :: S.Handler App App [(BillableId, Billable Amount)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101084"}}],"del_contents":[{"Del":{"text":"billableListHandler :: S.Handler App App [(BillableId, Billable)]","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:35458"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":5,"ins":{"up_context":[{"change":4,"pos":61305}],"down_context":[{"change":5,"pos":49536}],"flag":"BLOCK","start":101087,"end":101155,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61305},"to":{"change":4,"start":61305,"end":61363},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" getBip70PaymentRequestHandler,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101121"}},{"Add":{"text":" bip70PaymentResponseHandler,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101154"}}],"del_contents":[{"Del":{"text":" getPaymentRequestHandler,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61334"}},{"Del":{"text":" paymentResponseHandler,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61362"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":11,"ins":{"up_context":[{"change":4,"pos":61385}],"down_context":[{"change":4,"pos":61411}],"flag":"BLOCK","start":101156,"end":101252,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61385},"to":{"change":4,"start":61385,"end":61411},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Config as AC","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101191"}},{"Add":{"text":"import qualified Aftok.Currency.Bitcoin.Payments as Bitcoin","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101251"}}],"del_contents":[{"Del":{"text":"import Aftok.Config as AC","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61410"}}]}},{"Edit":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":15,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":61455}],"down_context":[{"change":4,"pos":61455}],"flag":"BLOCK","start":101253,"end":101362,"inode":{"change":5,"pos":9762}}},"contents":[{"Add":{"text":"import Aftok.Payments.Types","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101280"}},{"Add":{"text":" ( NativePayment (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101304"}},{"Add":{"text":" Payment' (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101323"}},{"Add":{"text":" PaymentId,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101338"}},{"Add":{"text":" nativeRequest,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101357"}},{"Add":{"text":" )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101361"}}]}},{"Edit":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":24,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61533},"to":{"change":4,"start":61533,"end":61598},"introduced_by":4}],"inode":{"change":5,"pos":9762}}},"contents":[{"Del":{"text":"import qualified Bippy.Proto as P","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61566"}},{"Del":{"text":"import Control.Exception (try)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61597"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":25,"ins":{"up_context":[{"change":4,"pos":61618}],"down_context":[{"change":4,"pos":61690}],"flag":"BLOCK","start":101363,"end":101373,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61618},"to":{"change":4,"start":61618,"end":61690},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" ( (^.),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101372"}}],"del_contents":[{"Del":{"text":" ( (.~),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61627"}},{"Del":{"text":" (^.),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61637"}},{"Del":{"text":" _1,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61645"}},{"Del":{"text":" _2,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61653"}},{"Del":{"text":" _Left,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61664"}},{"Del":{"text":" _Right,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61676"}},{"Del":{"text":" preview,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61689"}}]}},{"Edit":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":31,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61832},"to":{"change":4,"start":61832,"end":61873},"introduced_by":4}],"inode":{"change":5,"pos":9762}}},"contents":[{"Del":{"text":"import qualified Data.Text.Encoding as T","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61872"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":32,"ins":{"up_context":[{"change":4,"pos":61902}],"down_context":[{"change":4,"pos":62197}],"flag":"BLOCK","start":101374,"end":101639,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":61902},"to":{"change":4,"start":61902,"end":62197},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":"-- import Network.HTTP.Client","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101403"}},{"Add":{"text":"-- ( defaultManagerSettings,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101434"}},{"Add":{"text":"-- managerResponseTimeout,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101465"}},{"Add":{"text":"-- responseTimeoutMicro,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101494"}},{"Add":{"text":"-- )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101501"}},{"Add":{"text":"-- import Network.HTTP.Client.OpenSSL","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101539"}},{"Add":{"text":"-- import Network.Wreq","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101562"}},{"Add":{"text":"-- ( defaults,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101579"}},{"Add":{"text":"-- manager,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101595"}},{"Add":{"text":"-- )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101602"}},{"Add":{"text":"-- import OpenSSL.Session (context)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101638"}}],"del_contents":[{"Del":{"text":"import Network.HTTP.Client","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61928"}},{"Del":{"text":" ( HttpException,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61947"}},{"Del":{"text":" defaultManagerSettings,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:61975"}},{"Del":{"text":" managerResponseTimeout,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62003"}},{"Del":{"text":" responseTimeoutMicro,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62029"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62033"}},{"Del":{"text":"import Network.HTTP.Client.OpenSSL","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62068"}},{"Del":{"text":"import Network.Wreq","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62088"}},{"Del":{"text":" ( asValue,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62101"}},{"Del":{"text":" defaults,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62115"}},{"Del":{"text":" getWith,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62128"}},{"Del":{"text":" manager,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62141"}},{"Del":{"text":" responseBody,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62159"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62163"}},{"Del":{"text":"import OpenSSL.Session (context)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62196"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":44,"ins":{"up_context":[{"change":4,"pos":62214}],"down_context":[{"change":4,"pos":62249}],"flag":"BLOCK","start":101640,"end":101661,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":62214},"to":{"change":4,"start":62214,"end":62249},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" ( readRequestBody,","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101660"}}],"del_contents":[{"Del":{"text":" ( logError,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62227"}},{"Del":{"text":" readRequestBody,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62248"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":48,"ins":{"up_context":[{"change":5,"pos":9959}],"down_context":[{"change":5,"pos":6158}],"flag":"BLOCK","start":101662,"end":101757,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9959},"to":{"change":5,"start":6097,"end":6158},"introduced_by":5}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":"listPayableRequestsHandler :: S.Handler App App [(PaymentRequestId, SomePaymentRequestDetail)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101756"}}],"del_contents":[{"Del":{"text":"listPayableRequestsHandler :: S.Handler App App [BillDetail]","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:6157"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":52,"ins":{"up_context":[{"change":5,"pos":6264}],"down_context":[{"change":5,"pos":3970}],"flag":"BLOCK","start":101758,"end":101799,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6264},"to":{"change":5,"start":6264,"end":6344},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":6344},"to":{"change":5,"start":17650,"end":17651},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17650},"to":{"change":5,"start":17650,"end":17651},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":17651},"to":{"change":5,"start":6345,"end":6408},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6408},"to":{"change":5,"start":3884,"end":3970},"introduced_by":5}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" snapEval $ findPayableRequests uid sid","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101798"}}],"del_contents":[{"Del":{"text":" now <- liftIO $ C.getCurrentTime","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:6298"}},{"Del":{"text":" snapEval $ findPayableRequests uid sid now","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:6343"}},{"Del":{"text":"","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:17650"}},{"Del":{"text":"getPaymentRequestHandler :: S.Handler App App P.PaymentRequest","pos":"AL37SVTCKRSG4HG2PCYK5Z7QSIZZH5JHH4Q2VLMXFAXSAQRFFG4QC:6407"}},{"Del":{"text":"getPaymentRequestHandler =","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3910"}},{"Del":{"text":" view (_2 . paymentRequest) <$> getPaymentRequestHandler'","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:3969"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":54,"ins":{"up_context":[{"change":5,"pos":3971}],"down_context":[{"change":5,"pos":4053}],"flag":"BLOCK","start":101800,"end":101914,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3971},"to":{"change":5,"start":36180,"end":36254},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":36254},"to":{"change":5,"start":1850,"end":1882},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1850},"to":{"change":5,"start":1850,"end":1882},"introduced_by":5}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":"bip70PaymentResponseHandler :: AC.BillingConfig -> S.Handler App App PaymentId","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101878"}},{"Add":{"text":"bip70PaymentResponseHandler _ = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101913"}}],"del_contents":[{"Del":{"text":"paymentResponseHandler :: AC.BillingConfig -> S.Handler App App PaymentId","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:36253"}},{"Del":{"text":"paymentResponseHandler cfg = do","pos":"WZFQDWW4XK6M4A4PQ7WQJUTZUPRGQR7V7ZVZY5ZTL5AMGIFMHB2QC:1881"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":57,"ins":{"up_context":[{"change":5,"pos":4091}],"down_context":[{"change":4,"pos":62315}],"flag":"BLOCK","start":101915,"end":101963,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4091},"to":{"change":4,"start":62279,"end":62315},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" (prid, preq) <- getBip70PaymentRequestHandler","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:101962"}}],"del_contents":[{"Del":{"text":" preq <- getPaymentRequestHandler'","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62314"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":61,"ins":{"up_context":[{"change":4,"pos":62418}],"down_context":[{"change":4,"pos":62429}],"flag":"BLOCK","start":101964,"end":102055,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":62418},"to":{"change":4,"start":62418,"end":62429},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" (pure . Bitcoin.Payment Nothing Nothing Nothing (preq ^. Bitcoin.paymentRequestKey))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102054"}}],"del_contents":[{"Del":{"text":" pure","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62428"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":64,"ins":{"up_context":[{"change":5,"pos":51816}],"down_context":[{"change":5,"pos":2347}],"flag":"BLOCK","start":102056,"end":102711,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":51816},"to":{"change":4,"start":62475,"end":62753},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":62753},"to":{"change":5,"start":52091,"end":52116},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2064},"to":{"change":5,"start":52091,"end":52116},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":52116},"to":{"change":4,"start":62754,"end":62870},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":52228},"to":{"change":5,"start":5270,"end":5344},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":62870},"to":{"change":5,"start":5270,"end":5344},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5270},"to":{"change":5,"start":5270,"end":5344},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5344},"to":{"change":4,"start":62871,"end":63013},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" -- let opts =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102071"}},{"Add":{"text":" -- defaults","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102091"}},{"Add":{"text":" -- & manager","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102114"}},{"Add":{"text":" -- .~ Left (opensslManagerSettings context)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102168"}},{"Add":{"text":" -- & manager","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102191"}},{"Add":{"text":" -- .~ Left","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102212"}},{"Add":{"text":" -- ( defaultManagerSettings","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102252"}},{"Add":{"text":" -- { managerResponseTimeout = responseTimeoutMicro 10000","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102325"}},{"Add":{"text":" -- }","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102346"}},{"Add":{"text":" -- )","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102363"}},{"Add":{"text":" -- exchResp <-","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102380"}},{"Add":{"text":" -- liftIO","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102394"}},{"Add":{"text":" -- . try @HttpException","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102424"}},{"Add":{"text":" -- $ asValue","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102443"}},{"Add":{"text":" -- =<< (withOpenSSL $ getWith opts (cfg ^. exchangeRateServiceURI))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102519"}},{"Add":{"text":" -- _ <- traverse (logError . T.encodeUtf8 . show) (preview _Left exchResp)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102596"}},{"Add":{"text":" -- (preview (_Right . responseBody) exchResp)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102644"}},{"Add":{"text":" let newPayment = Payment (Const prid) now (BitcoinPayment pmnt)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102710"}}],"del_contents":[{"Del":{"text":" let opts =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62487"}},{"Del":{"text":" defaults","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62504"}},{"Del":{"text":" & manager","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62524"}},{"Del":{"text":" .~ Left (opensslManagerSettings context)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62575"}},{"Del":{"text":" & manager","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62595"}},{"Del":{"text":" .~ Left","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62613"}},{"Del":{"text":" ( defaultManagerSettings","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62650"}},{"Del":{"text":" { managerResponseTimeout = responseTimeoutMicro 10000","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62720"}},{"Del":{"text":" }","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62738"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62752"}},{"Del":{"text":" exchResp <-","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:52104"}},{"Del":{"text":" liftIO","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:52115"}},{"Del":{"text":" . try @HttpException","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62780"}},{"Del":{"text":" $ asValue","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62796"}},{"Del":{"text":" =<< (withOpenSSL $ getWith opts (cfg ^. exchangeRateServiceURI))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62869"}},{"Del":{"text":" _ <- traverse (logError . T.encodeUtf8 . show) (preview _Left exchResp)","pos":"4R7XIYK3BP664CO3YJ2VM64ES2JYN27UTQG5KS34OTEPAIODSZLQC:5343"}},{"Del":{"text":" let newPayment =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62889"}},{"Del":{"text":" Payment","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62905"}},{"Del":{"text":" (view _1 preq)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62930"}},{"Del":{"text":" pmnt","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62945"}},{"Del":{"text":" now","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:62959"}},{"Del":{"text":" (preview (_Right . responseBody) exchResp)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63012"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":84,"ins":{"up_context":[{"change":5,"pos":4402}],"down_context":[{"change":5,"pos":36359}],"flag":"BLOCK","start":102712,"end":103260,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4402},"to":{"change":4,"start":63014,"end":63098},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":52489},"to":{"change":5,"start":4484,"end":4561},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":63098},"to":{"change":5,"start":4484,"end":4561},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4484},"to":{"change":5,"start":4484,"end":4561},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4561},"to":{"change":4,"start":63099,"end":63242},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":"getBip70PaymentRequestHandler :: S.Handler App App (PaymentRequestId, Bitcoin.PaymentRequest)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102805"}},{"Add":{"text":"getBip70PaymentRequestHandler = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102840"}},{"Add":{"text":" (rid, SomePaymentRequest preq) <- getBip70PaymentRequestHandler'","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102907"}},{"Add":{"text":" case (preq ^. nativeRequest) of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102941"}},{"Add":{"text":" Bip70Request bp -> pure (rid, bp)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:102979"}},{"Add":{"text":" _ -> snapError 400 $ \"Not a BIP-70 bitcoin payment request.\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103044"}},{"Add":{"text":"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103045"}},{"Add":{"text":"getBip70PaymentRequestHandler' ::","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103079"}},{"Add":{"text":" S.Handler App App (PaymentRequestId, SomePaymentRequestDetail)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103144"}},{"Add":{"text":"getBip70PaymentRequestHandler' = do","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103180"}},{"Add":{"text":" pkey <- Bitcoin.PaymentKey . decodeUtf8 <$> requireParam \"paymentRequestKey\"","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103259"}}],"del_contents":[{"Del":{"text":"getPaymentRequestHandler' ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63042"}},{"Del":{"text":" S.Handler App App (PaymentRequestId, PaymentRequest)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63097"}},{"Del":{"text":"getPaymentRequestHandler' = do","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:4514"}},{"Del":{"text":" pkBytes <- requireParam \"paymentRequestKey\"","pos":"BSIUHCGFDFDFGWYMHZB7OVU3Z3IHPEUXRISIOPGZI2RUXZFDS2EQC:4560"}},{"Del":{"text":" pkey <-","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63108"}},{"Del":{"text":" maybe","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63118"}},{"Del":{"text":" (snapError 400 $ \"parameter paymentRequestKey is formatted incorrectly.\")","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63198"}},{"Del":{"text":" pure","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63209"}},{"Del":{"text":" (parsePaymentKey pkBytes)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63241"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":98,"ins":{"up_context":[{"change":4,"pos":63322}],"down_context":[{"change":5,"pos":52735}],"flag":"BLOCK","start":103261,"end":103306,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":63322},"to":{"change":4,"start":63322,"end":63359},"introduced_by":4}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" <> (view Bitcoin._PaymentKey pkey)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103305"}}],"del_contents":[{"Del":{"text":" <> (view _PaymentKey pkey)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:63358"}}]}},{"Replacement":{"inode":{"change":5,"pos":9762},"path":"server/Aftok/Snaplet/Payments.hs","line":100,"ins":{"up_context":[{"change":5,"pos":52741}],"down_context":[],"flag":"BLOCK","start":103307,"end":103363,"inode":{"change":5,"pos":9762}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":52741},"to":{"change":5,"start":36470,"end":36521},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":36470},"to":{"change":5,"start":36470,"end":36521},"introduced_by":5}],"inode":{"change":5,"pos":9762}},"ins_contents":[{"Add":{"text":" (mapMaybeT snapEval $ findPaymentRequestByKey pkey)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103362"}}],"del_contents":[{"Del":{"text":" (mapMaybeT snapEval $ findPaymentRequest pkey)","pos":"IPG33FAWXGEQ2PO6OXRT2PWWXHRNMPVUKKADL6UKKN5GD2CNZ25AC:36520"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":16,"ins":{"up_context":[{"change":5,"pos":3487}],"down_context":[{"change":4,"pos":66085}],"flag":"BLOCK","start":103365,"end":103472,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":3487},"to":{"change":4,"start":66018,"end":66085},"introduced_by":4}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":"import qualified Aftok.Currency.Zcash as Zcash","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103411"}},{"Add":{"text":"import Aftok.Currency.Zcash (RPCError, ZValidateAddressErr)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103471"}}],"del_contents":[{"Del":{"text":"import Aftok.Currency.Zcash (RPCError, ZAddr, ZValidateAddressErr)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66084"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":23,"ins":{"up_context":[{"change":4,"pos":66256}],"down_context":[{"change":4,"pos":66298}],"flag":"BLOCK","start":103473,"end":103509,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":66256},"to":{"change":4,"start":66256,"end":66298},"introduced_by":4}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" ( Email (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103488"}},{"Add":{"text":" RecoverBy (..),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103508"}}],"del_contents":[{"Del":{"text":" ( AccountRecovery (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66281"}},{"Del":{"text":" Email (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:66297"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":60,"ins":{"up_context":[{"change":4,"pos":67060}],"down_context":[{"change":4,"pos":67142}],"flag":"BLOCK","start":103510,"end":103600,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":67060},"to":{"change":4,"start":67060,"end":67142},"introduced_by":4}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" { validateZAddr :: Text -> m (Either (RPCError ZValidateAddressErr) Zcash.Address),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103599"}}],"del_contents":[{"Del":{"text":" { validateZAddr :: Text -> m (Either (RPCError ZValidateAddressErr) ZAddr),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:67141"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":67,"ins":{"up_context":[{"change":4,"pos":67255}],"down_context":[{"change":4,"pos":67311}],"flag":"BLOCK","start":103601,"end":103651,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":67255},"to":{"change":4,"start":67255,"end":67311},"introduced_by":4}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" _userAccountRecovery :: !(RecoverBy Text)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103650"}}],"del_contents":[{"Del":{"text":" _userAccountRecovery :: !(AccountRecovery Text)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:67310"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":99,"ins":{"up_context":[{"change":4,"pos":67701}],"down_context":[{"change":4,"pos":67775}],"flag":"BLOCK","start":103652,"end":103735,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":67701},"to":{"change":4,"start":67701,"end":67775},"introduced_by":4}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" (\\e -> fail $ \"Invitation code was rejected as invalid: \" <> toString e)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103734"}}],"del_contents":[{"Del":{"text":" (\\e -> fail $ \"Invitation code was rejected as invalid: \" <> e)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:67774"}}]}},{"Edit":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":108,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":5917}],"down_context":[{"change":5,"pos":5917}],"flag":"BLOCK","start":103736,"end":103754,"inode":{"change":5,"pos":3234}}},"contents":[{"Add":{"text":" deriving (Show)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103753"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":122,"ins":{"up_context":[{"change":5,"pos":4425}],"down_context":[{"change":5,"pos":4573}],"flag":"BLOCK","start":103755,"end":103826,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4425},"to":{"change":5,"start":4510,"end":4573},"introduced_by":5}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":"checkZAddrHandler :: RegisterOps IO -> S.Handler App App Zcash.Address","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103825"}}],"del_contents":[{"Del":{"text":"checkZAddrHandler :: RegisterOps IO -> S.Handler App App ZAddr","pos":"ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC:4572"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":132,"ins":{"up_context":[{"change":5,"pos":4874}],"down_context":[{"change":5,"pos":4968}],"flag":"BLOCK","start":103827,"end":103937,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4874},"to":{"change":4,"start":68208,"end":68222},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":68222},"to":{"change":5,"start":4889,"end":4968},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4889},"to":{"change":5,"start":4889,"end":4968},"introduced_by":5}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" Left err ->","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103842"}},{"Add":{"text":" snapError 400 $ \"The Z-Address provided for account recovery was invalid: \" <> show err","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:103936"}}],"del_contents":[{"Del":{"text":" Left _ ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:68221"}},{"Del":{"text":" snapError 400 \"The Z-Address provided for account recovery was invalid.\"","pos":"ENNZIQJG4XJ62QCNRMLNAXN7ICTPCHQFZTURX6QSUYYWNADFJHXQC:4967"}}]}},{"Replacement":{"inode":{"change":5,"pos":3234},"path":"server/Aftok/Snaplet/Users.hs","line":180,"ins":{"up_context":[{"change":5,"pos":9318}],"down_context":[{"change":5,"pos":6824}],"flag":"BLOCK","start":103938,"end":104015,"inode":{"change":5,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":9318},"to":{"change":4,"start":68845,"end":68937},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":68937},"to":{"change":5,"start":57272,"end":57278},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":57272},"to":{"change":5,"start":57272,"end":57278},"introduced_by":5}],"inode":{"change":5,"pos":3234}},"ins_contents":[{"Add":{"text":" (\\e -> snapError 400 $ \"Invitation code was rejected as invalid: \" <> e)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104014"}}],"del_contents":[{"Del":{"text":" ( \\e ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:68856"}},{"Del":{"text":" snapError 400 $ \"Invitation code was rejected as invalid: \" <> T.pack e","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:68936"}},{"Del":{"text":" )","pos":"EFSXYZPOGA5M4DN65IEIDO7JK6U34DMQELAPHOIL2UAT6HRC66BAC:57277"}}]}},{"Edit":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":5,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5756},"to":{"change":4,"start":70250,"end":70336},"introduced_by":4}],"inode":{"change":5,"pos":5424}}},"contents":[{"Del":{"text":"import Aftok.Currency.Bitcoin","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70279"}},{"Del":{"text":" ( NetworkId (..),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70299"}},{"Del":{"text":" NetworkMode,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70316"}},{"Del":{"text":" toNetwork,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70331"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70335"}}]}},{"Edit":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":26,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":70848},"to":{"change":4,"start":70848,"end":70904},"introduced_by":4}],"inode":{"change":5,"pos":5424}}},"contents":[{"Del":{"text":"import Haskoin.Address","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70870"}},{"Del":{"text":" ( Address,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70883"}},{"Del":{"text":" textToAddr,","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70899"}},{"Del":{"text":" )","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:70903"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":31,"ins":{"up_context":[{"change":4,"pos":70994}],"down_context":[{"change":5,"pos":10122}],"flag":"BLOCK","start":104017,"end":104062,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":70994},"to":{"change":4,"start":70994,"end":71046},"introduced_by":4}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":" S.Handler App App (EventId, KeyedLogEntry)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104061"}}],"del_contents":[{"Del":{"text":" S.Handler App App (EventId, KeyedLogEntry BTCNet)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71045"}}]}},{"Edit":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":35,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":71096},"to":{"change":4,"start":71096,"end":71122},"introduced_by":4}],"inode":{"change":5,"pos":5424}}},"contents":[{"Del":{"text":" nmode <- getNetworkMode","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71121"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":37,"ins":{"up_context":[{"change":4,"pos":71162}],"down_context":[{"change":4,"pos":71253}],"flag":"BLOCK","start":104063,"end":104146,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":71162},"to":{"change":4,"start":71162,"end":71253},"introduced_by":4}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":" case (A.eitherDecode requestBody >>= A.parseEither (parseLogEntry uid evCtr)) of","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104145"}}],"del_contents":[{"Del":{"text":" case A.eitherDecode requestBody","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71195"}},{"Del":{"text":" >>= A.parseEither (parseLogEntry nmode uid evCtr) of","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71252"}}]}},{"Edit":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":53,"atom":{"EdgeMap":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":5708},"to":{"change":5,"start":570,"end":571},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":35680},"to":{"change":5,"start":570,"end":571},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":58697},"to":{"change":5,"start":570,"end":571},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":71607},"to":{"change":5,"start":570,"end":571},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":570},"to":{"change":5,"start":570,"end":571},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":571},"to":{"change":5,"start":18476,"end":18550},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":18550},"to":{"change":5,"start":643,"end":672},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":643},"to":{"change":5,"start":643,"end":672},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":672},"to":{"change":4,"start":71608,"end":71657},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":58751},"to":{"change":5,"start":35681,"end":35743},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":71657},"to":{"change":5,"start":35681,"end":35743},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":12656},"to":{"change":5,"start":35681,"end":35743},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":35743},"to":{"change":4,"start":71658,"end":71692},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":5,"pos":58788},"to":{"change":5,"start":4323,"end":4361},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":4,"pos":71692},"to":{"change":5,"start":4323,"end":4361},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6005},"to":{"change":5,"start":4323,"end":4361},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":4361},"to":{"change":4,"start":71693,"end":71732},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":71732},"to":{"change":5,"start":59964,"end":60023},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":58830},"to":{"change":5,"start":59964,"end":60023},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":35805},"to":{"change":5,"start":10149,"end":10164},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":60023},"to":{"change":5,"start":10149,"end":10164},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6216},"to":{"change":5,"start":10149,"end":10164},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":10164},"to":{"change":4,"start":71733,"end":72008},"introduced_by":4}],"inode":{"change":5,"pos":5424}}},"contents":[{"Del":{"text":"","pos":"UILI6PILCRDPZ3XYA54LGIGPSU7ERWNHCE7R3CE64ZEC7ONOEMOQC:570"}},{"Del":{"text":"logWorkBTCHandler :: (C.UTCTime -> LogEvent) -> S.Handler App App EventId","pos":"HMDM3B557TO5RYP2IGFFC2C2VN6HYZTDQ47CJY2O37BW55DSMFZAC:18549"}},{"Del":{"text":"logWorkBTCHandler evCtr = do","pos":"UILI6PILCRDPZ3XYA54LGIGPSU7ERWNHCE7R3CE64ZEC7ONOEMOQC:671"}},{"Del":{"text":" uid <- requireUserId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71630"}},{"Del":{"text":" pid <- requireProjectId","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71656"}},{"Del":{"text":" nmode <- getNetworkMode","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:35706"}},{"Del":{"text":" let network = toNetwork nmode BTC","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:35742"}},{"Del":{"text":" addrBytes <- getParam \"btcAddr\"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71691"}},{"Del":{"text":" requestBody <- readRequestBody 4096","pos":"EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC:4360"}},{"Del":{"text":" timestamp <- liftIO C.getCurrentTime","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71731"}},{"Del":{"text":" case fmap decodeUtf8 addrBytes >>= textToAddr network of","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:60022"}},{"Del":{"text":" Nothing ->","pos":"NEDDHXUK3GNFMOFO3KLU7NRIHCTYNWBT3D6HTKZAOXFDE6HMDZ6AC:10163"}},{"Del":{"text":" snapError 400 $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71754"}},{"Del":{"text":" \"Unable to parse bitcoin address from \"","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71802"}},{"Del":{"text":" <> (show addrBytes)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71832"}},{"Del":{"text":" Just addr ->","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71849"}},{"Del":{"text":" snapEval . createEvent pid uid $","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71888"}},{"Del":{"text":" LogEntry","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71905"}},{"Del":{"text":" (CreditToCurrency (BTC, addr))","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71946"}},{"Del":{"text":" (evCtr timestamp)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:71974"}},{"Del":{"text":" (A.decode requestBody)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:72007"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":54,"ins":{"up_context":[{"change":5,"pos":6348}],"down_context":[{"change":5,"pos":14852}],"flag":"BLOCK","start":104147,"end":104195,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6348},"to":{"change":5,"start":14781,"end":14852},"introduced_by":5}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":"projectWorkIndex :: S.Handler App App WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104194"}}],"del_contents":[{"Del":{"text":"projectWorkIndex :: S.Handler App App (WorkIndex (NetworkId, Address))","pos":"QMEYU4MWLTSWPWEEOFRLK2IKE64BY3V5X73323WPLCGPP3TPDYGAC:14851"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":60,"ins":{"up_context":[{"change":5,"pos":6632}],"down_context":[{"change":5,"pos":4675}],"flag":"BLOCK","start":104196,"end":104239,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":6632},"to":{"change":5,"start":4611,"end":4675},"introduced_by":5}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":"userEvents :: S.Handler App App [LogEntry]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104238"}}],"del_contents":[{"Del":{"text":"userEvents :: S.Handler App App [LogEntry (NetworkId, Address)]","pos":"2J37EVJMX255K3XEJHTZGRPEIRMAQ62JQWOA7JU3YTZUB6PUPWVQC:4674"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":73,"ins":{"up_context":[{"change":5,"pos":8959}],"down_context":[{"change":5,"pos":15904}],"flag":"BLOCK","start":104240,"end":104285,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":8959},"to":{"change":5,"start":15051,"end":15119},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5386},"to":{"change":5,"start":15051,"end":15119},"introduced_by":5}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":"userWorkIndex :: S.Handler App App WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104284"}}],"del_contents":[{"Del":{"text":"userWorkIndex :: S.Handler App App (WorkIndex (NetworkId, Address))","pos":"QMEYU4MWLTSWPWEEOFRLK2IKE64BY3V5X73323WPLCGPP3TPDYGAC:15118"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":76,"ins":{"up_context":[{"change":5,"pos":15167}],"down_context":[{"change":5,"pos":10183}],"flag":"BLOCK","start":104286,"end":104340,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":15167},"to":{"change":5,"start":36080,"end":36147},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":5386},"to":{"change":5,"start":36080,"end":36147},"introduced_by":5}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":"payoutsHandler :: S.Handler App App FractionalPayouts","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104339"}}],"del_contents":[{"Del":{"text":"payoutsHandler :: S.Handler App App (Payouts (NetworkId, Address))","pos":"B6HWAPDPXIWH7CHK5VLMWLL6EQN6NOFZEFYO47BPUY2ZO4SL7VDAC:36146"}}]}},{"Edit":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":91,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":72435},"to":{"change":4,"start":72435,"end":72461},"introduced_by":4}],"inode":{"change":5,"pos":5424}}},"contents":[{"Del":{"text":" nmode <- getNetworkMode","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:72460"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":102,"ins":{"up_context":[{"change":4,"pos":72732}],"down_context":[{"change":5,"pos":269}],"flag":"BLOCK","start":104341,"end":104403,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":72732},"to":{"change":4,"start":72732,"end":72800},"introduced_by":4}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":" (A.parseEither (parseEventAmendment modTime) requestJSON)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104402"}}],"del_contents":[{"Del":{"text":" (A.parseEither (parseEventAmendment nmode modTime) requestJSON)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:72799"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":104,"ins":{"up_context":[{"change":5,"pos":270}],"down_context":[{"change":5,"pos":16089}],"flag":"BLOCK","start":104404,"end":104503,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":270},"to":{"change":4,"start":72801,"end":72896},"introduced_by":4},{"previous":"","flag":"DELETED","from":{"change":4,"pos":72896},"to":{"change":5,"start":16041,"end":16089},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":16041},"to":{"change":5,"start":16041,"end":16089},"introduced_by":5}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":"keyedLogEntryJSON :: (EventId, KeyedLogEntry) -> A.Value","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104460"}},{"Add":{"text":"keyedLogEntryJSON (eid, (pid, uid, ev)) =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104502"}}],"del_contents":[{"Del":{"text":"keyedLogEntryJSON ::","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:72821"}},{"Del":{"text":" NetworkMode -> (EventId, KeyedLogEntry (NetworkId, Address)) -> A.Value","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:72895"}},{"Del":{"text":"keyedLogEntryJSON nmode (eid, (pid, uid, ev)) =","pos":"UWMGUJOW5X5HQTS76T2FD7MNAJF7SESPQVU5FDIZO52V75TT2X6AC:16088"}}]}},{"Replacement":{"inode":{"change":5,"pos":5424},"path":"server/Aftok/Snaplet/WorkLog.hs","line":112,"ins":{"up_context":[{"change":4,"pos":73047}],"down_context":[],"flag":"BLOCK","start":104504,"end":104531,"inode":{"change":5,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":73047},"to":{"change":4,"start":73047,"end":73080},"introduced_by":4}],"inode":{"change":5,"pos":5424}},"ins_contents":[{"Add":{"text":" <> logEntryFields ev","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104530"}}],"del_contents":[{"Del":{"text":" <> logEntryFields nmode ev","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:73079"}}]}},{"Edit":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":6,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":75276}],"down_context":[{"change":4,"pos":75276}],"flag":"BLOCK","start":104533,"end":104588,"inode":{"change":133,"pos":5188}}},"contents":[{"Add":{"text":"import Aftok.Currency.Bitcoin.Payments (_bip70Request)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104587"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":85,"ins":{"up_context":[{"change":4,"pos":77519}],"down_context":[{"change":4,"pos":77589}],"flag":"BLOCK","start":104589,"end":104651,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":77519},"to":{"change":4,"start":77519,"end":77589},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" serveJSON workIndexJSON $ method GET projectWorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104650"}}],"del_contents":[{"Del":{"text":" serveJSON (workIndexJSON nmode) (method GET projectWorkIndex)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:77588"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":87,"ins":{"up_context":[{"change":4,"pos":77617}],"down_context":[{"change":4,"pos":77683}],"flag":"BLOCK","start":104652,"end":104710,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":77617},"to":{"change":4,"start":77617,"end":77683},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" serveJSON payoutsJSON $ method GET payoutsHandler","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104709"}}],"del_contents":[{"Del":{"text":" serveJSON (payoutsJSON nmode) $ method GET payoutsHandler","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:77682"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":89,"ins":{"up_context":[{"change":4,"pos":77706}],"down_context":[{"change":4,"pos":77881}],"flag":"BLOCK","start":104711,"end":104780,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":77706},"to":{"change":4,"start":77706,"end":77881},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" serveJSON keyedLogEntryJSON $ method POST (logWorkHandler f)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104779"}}],"del_contents":[{"Del":{"text":" serveJSON (keyedLogEntryJSON nmode) $ method POST (logWorkHandler f)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:77782"}},{"Del":{"text":" -- logWorkBTCRoute f =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:77811"}},{"Del":{"text":" -- serveJSON eventIdJSON $ method POST (logWorkBTCHandler f)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:77880"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":92,"ins":{"up_context":[{"change":4,"pos":77986}],"down_context":[{"change":4,"pos":78056}],"flag":"BLOCK","start":104781,"end":104843,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":77986},"to":{"change":4,"start":77986,"end":78056},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" serveJSON (fmap logEntryJSON) $ method GET userEvents","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104842"}}],"del_contents":[{"Del":{"text":" serveJSON (fmap $ logEntryJSON nmode) $ method GET userEvents","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78055"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":94,"ins":{"up_context":[{"change":4,"pos":78083}],"down_context":[{"change":4,"pos":78150}],"flag":"BLOCK","start":104844,"end":104903,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":78083},"to":{"change":4,"start":78083,"end":78150},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" serveJSON workIndexJSON $ method GET userWorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104902"}}],"del_contents":[{"Del":{"text":" serveJSON (workIndexJSON nmode) $ method GET userWorkIndex","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78149"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":105,"ins":{"up_context":[{"change":4,"pos":78682}],"down_context":[{"change":4,"pos":78816}],"flag":"BLOCK","start":104904,"end":105049,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":78682},"to":{"change":4,"start":78682,"end":78816},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" -- payableRequestsRoute =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:104935"}},{"Add":{"text":" -- serveJSON billDetailsJSON $ method GET listPayableRequestsHandler","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105012"}},{"Add":{"text":" getBip70PaymentRequestRoute =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105048"}}],"del_contents":[{"Del":{"text":" payableRequestsRoute =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78710"}},{"Del":{"text":" serveJSON billDetailsJSON $ method GET listPayableRequestsHandler","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78784"}},{"Del":{"text":" getPaymentRequestRoute =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78815"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":111,"ins":{"up_context":[{"change":4,"pos":78882}],"down_context":[{"change":4,"pos":78959}],"flag":"BLOCK","start":105050,"end":105179,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":78882},"to":{"change":4,"start":78882,"end":78959},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" . _bip70Request","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105075"}},{"Add":{"text":" . snd","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105091"}},{"Add":{"text":" =<< method GET getBip70PaymentRequestHandler","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105146"}},{"Add":{"text":" submitBip70PaymentRoute =","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105178"}}],"del_contents":[{"Del":{"text":" =<< method GET getPaymentRequestHandler","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78931"}},{"Del":{"text":" submitPaymentRoute =","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:78958"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":116,"ins":{"up_context":[{"change":4,"pos":78993}],"down_context":[{"change":5,"pos":64887}],"flag":"BLOCK","start":105180,"end":105255,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":78993},"to":{"change":4,"start":78993,"end":79063},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" method POST (bip70PaymentResponseHandler $ cfg ^. billingConfig)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105254"}}],"del_contents":[{"Del":{"text":" method POST (paymentResponseHandler $ cfg ^. billingConfig)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79062"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":119,"ins":{"up_context":[{"change":4,"pos":79138}],"down_context":[{"change":4,"pos":80316}],"flag":"BLOCK","start":105256,"end":106570,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":79138},"to":{"change":4,"start":79138,"end":80316},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" (\"login\", loginRoute), -- login.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105296"}},{"Add":{"text":" (\"login\", xhrLoginRoute), -- login_xhr.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105344"}},{"Add":{"text":" (\"logout\", logoutRoute), -- logout.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105388"}},{"Add":{"text":" (\"login/check\", checkLoginRoute), -- login.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105440"}},{"Add":{"text":" (\"register\", registerRoute), -- create_user.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105493"}},{"Add":{"text":" (\"validate_zaddr\", checkZAddrRoute), -- check_zaddr.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105554"}},{"Add":{"text":" (\"accept_invitation\", acceptInviteRoute),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105602"}},{"Add":{"text":" (\"user/projects/:projectId/logStart\", logWorkRoute StartWork), -- log_start.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105687"}},{"Add":{"text":" (\"user/projects/:projectId/logEnd\", logWorkRoute StopWork), -- log_end.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105767"}},{"Add":{"text":" (\"user/projects/:projectId/events\", userEventsRoute), -- list_user_events.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105850"}},{"Add":{"text":" (\"user/projects/:projectId/workIndex\", userWorkIndexRoute), -- list_user_intervals.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:105942"}},{"Add":{"text":" (\"projects/:projectId/workIndex\", projectWorkIndexRoute), -- list_project_intervals.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106035"}},{"Add":{"text":" (\"projects/:projectId/auctions\", auctionCreateRoute), -- <|> auctionListRoute)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106120"}},{"Add":{"text":" (\"projects/:projectId/billables\", billableCreateRoute <|> billableListRoute), -- create_billable.sh / list_project_billables.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106254"}},{"Add":{"text":" (\"projects/:projectId/payouts\", projectPayoutsRoute), -- list_project_payouts.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106341"}},{"Add":{"text":" (\"projects/:projectId/invite\", inviteRoute), -- invite.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106405"}},{"Add":{"text":" (\"projects/:projectId\", projectRoute), -- get_project.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106468"}},{"Add":{"text":" (\"projects\", projectCreateRoute <|> projectListRoute), -- create_project.sh, list_projects.sh","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106569"}}],"del_contents":[{"Del":{"text":" (\"login\", loginRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79166"}},{"Del":{"text":" (\"login\", xhrLoginRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79198"}},{"Del":{"text":" (\"logout\", logoutRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79229"}},{"Del":{"text":" (\"login/check\", checkLoginRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79269"}},{"Del":{"text":" (\"register\", registerRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79304"}},{"Del":{"text":" (\"validate_zaddr\", checkZAddrRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79347"}},{"Del":{"text":" ( \"accept_invitation\",","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79376"}},{"Del":{"text":" acceptInviteRoute","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79402"}},{"Del":{"text":" ),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79411"}},{"Del":{"text":" -- , (\"projects/:projectId/logStart/:btcAddr\" , logWorkBTCRoute StartWork)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79492"}},{"Del":{"text":" -- , (\"projects/:projectId/logEnd/:btcAddr\" , logWorkBTCRoute StopWork)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79572"}},{"Del":{"text":" (\"user/projects/:projectId/logStart\", logWorkRoute StartWork),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79641"}},{"Del":{"text":" (\"user/projects/:projectId/logEnd\", logWorkRoute StopWork),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79707"}},{"Del":{"text":" (\"user/projects/:projectId/events\", userEventsRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79767"}},{"Del":{"text":" (\"user/projects/:projectId/workIndex\", userWorkIndexRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79833"}},{"Del":{"text":" (\"projects/:projectId/workIndex\", projectWorkIndexRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79897"}},{"Del":{"text":" ( \"projects/:projectId/auctions\",","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79937"}},{"Del":{"text":" auctionCreateRoute","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79964"}},{"Del":{"text":" ), -- <|> auctionListRoute)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:79998"}},{"Del":{"text":" ( \"projects/:projectId/billables\",","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80039"}},{"Del":{"text":" billableCreateRoute <|> billableListRoute","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80089"}},{"Del":{"text":" ),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80098"}},{"Del":{"text":" (\"projects/:projectId/payouts\", projectPayoutsRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80158"}},{"Del":{"text":" (\"projects/:projectId/invite\", inviteRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80209"}},{"Del":{"text":" (\"projects/:projectId\", projectRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80254"}},{"Del":{"text":" (\"projects\", projectCreateRoute <|> projectListRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80315"}}]}},{"Replacement":{"inode":{"change":133,"pos":5188},"path":"server/Main.hs","line":140,"ins":{"up_context":[{"change":4,"pos":80462}],"down_context":[{"change":4,"pos":80623}],"flag":"BLOCK","start":106571,"end":106749,"inode":{"change":133,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":80462},"to":{"change":4,"start":80462,"end":80623},"introduced_by":4}],"inode":{"change":133,"pos":5188}},"ins_contents":[{"Add":{"text":" -- (\"subscriptions/:subscriptionId/payment_requests\", payableRequestsRoute),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106653"}},{"Add":{"text":" (\"pay/btc/:paymentRequestKey\", getBip70PaymentRequestRoute <|> submitBip70PaymentRoute),","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106748"}}],"del_contents":[{"Del":{"text":" (\"subscriptions/:subscriptionId/payment_requests\", payableRequestsRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80541"}},{"Del":{"text":" (\"pay/:paymentRequestKey\", getPaymentRequestRoute <|> submitPaymentRoute),","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:80622"}}]}},{"Edit":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":11,"atom":{"NewVertex":{"up_context":[{"change":5,"pos":1660}],"down_context":[{"change":4,"pos":82704}],"flag":"BLOCK","start":106753,"end":106787,"inode":{"change":5,"pos":3665}}},"contents":[{"Add":{"text":"import Aftok.Generators (genUUID)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106786"}}]}},{"Edit":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":14,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":82762}],"down_context":[{"change":4,"pos":82762}],"flag":"BLOCK","start":106788,"end":106821,"inode":{"change":5,"pos":3665}}},"contents":[{"Add":{"text":"import Aftok.Types (UserId (..))","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106820"}}]}},{"Edit":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":21,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":4,"pos":82945},"to":{"change":4,"start":82945,"end":83035},"introduced_by":4}],"inode":{"change":5,"pos":3665}}},"contents":[{"Del":{"text":"import Haskoin.Address (Address)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:82977"}},{"Del":{"text":"import Haskoin.Util.Arbitrary.Address (arbitraryAddress)","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:83034"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":46,"ins":{"up_context":[{"change":5,"pos":2046}],"down_context":[{"change":5,"pos":2852}],"flag":"BLOCK","start":106822,"end":106852,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2046},"to":{"change":5,"start":64926,"end":64966},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":"genWorkIndex :: Gen WorkIndex","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106851"}}],"del_contents":[{"Del":{"text":"genWorkIndex :: Gen (WorkIndex Address)","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:64965"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":48,"ins":{"up_context":[{"change":5,"pos":2867}],"down_context":[{"change":5,"pos":65032}],"flag":"BLOCK","start":106853,"end":106910,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":2867},"to":{"change":5,"start":64967,"end":65032},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" let recordGen :: Gen (CreditTo, L.NonEmpty I.Interval)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106909"}}],"del_contents":[{"Del":{"text":" let recordGen :: Gen (CreditTo Address, L.NonEmpty I.Interval)","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65031"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":50,"ins":{"up_context":[{"change":5,"pos":65053}],"down_context":[{"change":5,"pos":70220}],"flag":"BLOCK","start":106911,"end":106945,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":65053},"to":{"change":4,"start":83297,"end":83330},"introduced_by":4}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" uid <- UserId <$> genUUID","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106944"}}],"del_contents":[{"Del":{"text":" addr <- arbitraryAddress","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:83329"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":52,"ins":{"up_context":[{"change":5,"pos":70250}],"down_context":[{"change":4,"pos":83331}],"flag":"BLOCK","start":106946,"end":106985,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":70250},"to":{"change":5,"start":65088,"end":65132},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" pure (CreditToUser uid, ivals)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:106984"}}],"del_contents":[{"Del":{"text":" pure (CreditToCurrency addr, ivals)","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65131"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":59,"ins":{"up_context":[{"change":5,"pos":65227}],"down_context":[{"change":4,"pos":83382}],"flag":"BLOCK","start":106986,"end":107045,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":65227},"to":{"change":5,"start":65227,"end":65287},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" testUsers <- take 3 <$> sample' (UserId <$> genUUID)","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:107044"}}],"del_contents":[{"Del":{"text":" testAddrs <- replicateM 3 (generate arbitraryAddress)","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65286"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":72,"ins":{"up_context":[{"change":4,"pos":83768}],"down_context":[{"change":5,"pos":1422}],"flag":"BLOCK","start":107046,"end":107098,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":4,"pos":83768},"to":{"change":5,"start":65329,"end":65389},"introduced_by":4},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":418},"to":{"change":5,"start":65329,"end":65389},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" testIntervals :: [(CreditTo, I.Interval)]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:107097"}}],"del_contents":[{"Del":{"text":" testIntervals :: [(CreditTo Address, I.Interval)]","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65388"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":74,"ins":{"up_context":[{"change":5,"pos":1451}],"down_context":[{"change":5,"pos":65390}],"flag":"BLOCK","start":107099,"end":107129,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1451},"to":{"change":4,"start":83769,"end":83799},"introduced_by":4}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" user <- testUsers","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:107128"}}],"del_contents":[{"Del":{"text":" addr <- testAddrs","pos":"X3ES7NUA42D2BF7CQDDKXM5CLMVCYA3H5YU5KXLPTGDBFPE2LNVAC:83798"}}]}},{"Replacement":{"inode":{"change":5,"pos":3665},"path":"test/Aftok/TimeLogSpec.hs","line":76,"ins":{"up_context":[{"change":5,"pos":65436}],"down_context":[{"change":5,"pos":1499}],"flag":"BLOCK","start":107130,"end":107232,"inode":{"change":5,"pos":3665}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":65436},"to":{"change":5,"start":65436,"end":65503},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":1453},"to":{"change":5,"start":65504,"end":65551},"introduced_by":5}],"inode":{"change":5,"pos":3665}},"ins_contents":[{"Add":{"text":" pure $ (CreditToUser user, I.interval start' end')","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:107192"}},{"Add":{"text":" testLogEntries :: [LogEntry]","pos":"M4PWY5RUV72AEDCNC4O7UKBPHBIACR4354YTSC3SUZGWFV5UBJBQC:107231"}}],"del_contents":[{"Del":{"text":" pure $ (CreditToCurrency addr, I.interval start' end')","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65502"}},{"Del":{"text":" testLogEntries :: [LogEntry Address]","pos":"LTSVBVA235BQAIU3SQURKSRHIAL33K47G4J6TSEP2K353OCHNJEAC:65550"}}]}}],"owner":"nuttycom","repo":"aftok","token":"YvtWx/aYc87kgJ6e3nCxSX49G5bcxzi84NgINBz03W0=","login":null}

…

Dependencies

Change contents

Review