{"header":{"message":"Adding serveJSON combinator to eliminate some boilerplate from handlers.","description":null,"timestamp":"2015-03-17T23:42:57Z","authors":[{"email":"kris.nuttycombe@gmail.com","name":"Kris Nuttycombe"}]},"hash":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC","authors":[],"deps":{"hashes":[["XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC","Adding serveJSON combinator to eliminate some boilerplate from handlers."],["AA",null],["EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC","Update task list."],["W35DDBFYF6Z4ZPCFEO5RPAONZLYCSNTXUSTS6FIUUVZHCI6Q7GHAC","Factor common JSON conversions up into client lib module."],["2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC","Event logging is now functioning in postgres."],["PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","Postgres & auth are beginning to function."],["4IQVQL4TS35GL2GYZJG254TKJLL5EHMRSFT77Z4VTRZIG2TMBM3QC","Added client for payouts endpoint."],["BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","Beginning of modularization of server."],["Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","Very WIP. Wow."],["LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC","More database stuff."],["IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","Work in progress replacing sqlite with postgres."],["I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC","Require project permissions for access to most data."],["ADMKQQGCGVSHHIMVQ4XFRDCG544SBJCYALSKZV45CQQBZ4ACUH2AC","Initial empty Snap project."],["2Y2QZFVFSKXEFEGYJB5A7GI735ONWPCF7DVTIY5T73AUEVTZTBBQC","Switch to more modern cabal2nix-based workflow."],["64C6AWH66FDKU6UE6Z6JPX2J2GBM2JOPTH2GL6LHKAIUBGNGDZ5AC","Rename Ananke -> Quixotic, project reboot."]],"deps":["EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC"],"known":["W35DDBFYF6Z4ZPCFEO5RPAONZLYCSNTXUSTS6FIUUVZHCI6Q7GHAC","4IQVQL4TS35GL2GYZJG254TKJLL5EHMRSFT77Z4VTRZIG2TMBM3QC","IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC","I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC","PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC"]},"hunks":[{"Edit":{"inode":{"change":3,"pos":456},"path":"lib/Quixotic/Database/PostgreSQL.hs","line":217,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1369},"to":{"change":3,"start":1369,"end":1370},"introduced_by":3}],"inode":{"change":3,"pos":456}}},"contents":[{"Del":{"text":"","pos":"LD4GLVSF6YTA7OZWIGJ45H6TUXGM4WKUIYXKWQFNUP36WDMYSMXAC:1369"}}]}},{"Replacement":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":9,"ins":{"up_context":[{"change":3,"pos":215}],"down_context":[{"change":3,"pos":231}],"flag":"BLOCK","start":5,"end":36,"inode":{"change":3,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":215},"to":{"change":3,"start":215,"end":231},"introduced_by":3}],"inode":{"change":3,"pos":19}},"ins_contents":[{"Add":{"text":"import qualified Data.Map as M","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:35"}}],"del_contents":[{"Del":{"text":"import Data.Map","pos":"W35DDBFYF6Z4ZPCFEO5RPAONZLYCSNTXUSTS6FIUUVZHCI6Q7GHAC:230"}}]}},{"Replacement":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":20,"ins":{"up_context":[{"change":3,"pos":2143}],"down_context":[{"change":3,"pos":484}],"flag":"BLOCK","start":37,"end":76,"inode":{"change":3,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":2143},"to":{"change":2,"start":3779,"end":3816},"introduced_by":2}],"inode":{"change":3,"pos":19}},"ins_contents":[{"Add":{"text":" toJSON $ M.mapKeys (^. _BtcAddr) p","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:75"}}],"del_contents":[{"Del":{"text":" toJSON $ mapKeys (^. _BtcAddr) p","pos":"EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC:3815"}}]}},{"Replacement":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":24,"ins":{"up_context":[{"change":3,"pos":748}],"down_context":[{"change":3,"pos":2225}],"flag":"BLOCK","start":77,"end":126,"inode":{"change":3,"pos":19}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":748},"to":{"change":3,"start":2178,"end":2225},"introduced_by":3}],"inode":{"change":3,"pos":19}},"ins_contents":[{"Add":{"text":" PayoutsJ . M.mapKeys BtcAddr <$> parseJSON v","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:125"}}],"del_contents":[{"Del":{"text":" PayoutsJ . mapKeys BtcAddr <$> parseJSON v","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:2224"}}]}},{"Edit":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":37,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":2559}],"down_context":[{"change":3,"pos":485}],"flag":"BLOCK","start":127,"end":411,"inode":{"change":3,"pos":19}}},"contents":[{"Add":{"text":"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:127"}},{"Add":{"text":"newtype ProjectJ = ProjectJ Project","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:163"}},{"Add":{"text":"makePrisms ''ProjectJ","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:185"}},{"Add":{"text":"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:186"}},{"Add":{"text":"instance ToJSON ProjectJ where","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:217"}},{"Add":{"text":" toJSON (ProjectJ p) = ","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:242"}},{"Add":{"text":" object [ \"projectName\" .= (p ^. projectName)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:294"}},{"Add":{"text":" , \"inceptionDate\" .= (p ^. inceptionDate)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:348"}},{"Add":{"text":" , \"initiator\" .= (p ^. (initiator._UserId)) ]","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:410"}}]}},{"Edit":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":47,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":486}],"down_context":[{"change":3,"pos":2560}],"flag":"BLOCK","start":412,"end":463,"inode":{"change":3,"pos":19}}},"contents":[{"Add":{"text":"newtype WidxJ = WidxJ WorkIndex","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:443"}},{"Add":{"text":"makePrisms ''WidxJ","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:462"}}]}},{"Edit":{"inode":{"change":3,"pos":19},"path":"lib/Quixotic/Json.hs","line":50,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":2561}],"down_context":[],"flag":"BLOCK","start":464,"end":590,"inode":{"change":3,"pos":19}}},"contents":[{"Add":{"text":"instance ToJSON WidxJ where","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:491"}},{"Add":{"text":" toJSON (WidxJ widx) = ","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:516"}},{"Add":{"text":" toJSON $ (fmap IntervalJ) <$> (M.mapKeysWith (++) (^._BtcAddr) widx)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:589"}}]}},{"Edit":{"inode":{"change":13,"pos":5188},"path":"server/Main.hs","line":10,"atom":{"NewVertex":{"up_context":[{"change":14,"pos":170}],"down_context":[{"change":3,"pos":918}],"flag":"BLOCK","start":593,"end":626,"inode":{"change":13,"pos":5188}}},"contents":[{"Add":{"text":"import qualified Data.Aeson as A","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:625"}}]}},{"Edit":{"inode":{"change":13,"pos":5188},"path":"server/Main.hs","line":13,"atom":{"NewVertex":{"up_context":[{"change":15,"pos":2567}],"down_context":[{"change":3,"pos":942}],"flag":"BLOCK","start":627,"end":648,"inode":{"change":13,"pos":5188}}},"contents":[{"Add":{"text":"import Quixotic.Json","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:647"}}]}},{"Replacement":{"inode":{"change":13,"pos":5188},"path":"server/Main.hs","line":57,"ins":{"up_context":[{"change":3,"pos":1105}],"down_context":[{"change":3,"pos":8999}],"flag":"BLOCK","start":649,"end":1120,"inode":{"change":13,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1105},"to":{"change":3,"start":1105,"end":1196},"introduced_by":3},{"previous":"","flag":"DELETED","from":{"change":3,"pos":1196},"to":{"change":3,"start":1826,"end":1879},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3862},"to":{"change":3,"start":1826,"end":1879},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":1879},"to":{"change":3,"start":1197,"end":1396},"introduced_by":3}],"inode":{"change":13,"pos":5188}},"ins_contents":[{"Add":{"text":" , (\"projects/:projectId/log/:btcAddr\", serveJSON WidxJ $ method GET loggedIntervalsHandler)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:757"}},{"Add":{"text":" , (\"projects/:projectId\", serveJSON ProjectJ $ method GET projectGetHandler)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:846"}},{"Add":{"text":" , (\"projects\", void $ method POST projectCreateHandler)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:925"}},{"Add":{"text":" , (\"projects\", serveJSON (fmap (ProjectJ._project)) $ method GET projectListHandler)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1033"}},{"Add":{"text":" , (\"payouts/:projectId\", serveJSON PayoutsJ $ method GET payoutsHandler)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1119"}}],"del_contents":[{"Del":{"text":" , (\"projects/:projectId/log/:btcAddr\", method GET loggedIntervalsHandler)","pos":"2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC:1195"}},{"Del":{"text":" , (\"projects/:projectId\", method GET ok)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1878"}},{"Del":{"text":" , (\"projects\", void $ method POST projectCreateHandler)","pos":"2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC:1264"}},{"Del":{"text":" , (\"projects\", void $ method GET projectListHandler)","pos":"2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC:1330"}},{"Del":{"text":" , (\"payouts/:projectId\", method GET payoutsHandler)","pos":"2G3GNDDUOVPF45PELJ65ZB2IXEHJJXJILFRVHZXGPXUL4BVNZJFQC:1395"}}]}},{"Edit":{"inode":{"change":13,"pos":5188},"path":"server/Main.hs","line":90,"atom":{"NewVertex":{"up_context":[{"change":14,"pos":1197}],"down_context":[],"flag":"BLOCK","start":1121,"end":1308,"inode":{"change":13,"pos":5188}}},"contents":[{"Add":{"text":"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1121"}},{"Add":{"text":"serveJSON :: (MonadSnap m, A.ToJSON a) => (b -> a) -> m b -> m ()","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1187"}},{"Add":{"text":"serveJSON f ma = do","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1207"}},{"Add":{"text":" modifyResponse $ addHeader \"content-type\" \"application/json\"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1270"}},{"Add":{"text":" writeLBS =<< (A.encode . f <$> ma)","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1307"}}]}},{"Edit":{"inode":{"change":3,"pos":2363},"path":"server/Quixotic/Snaplet/Projects.hs","line":24,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":2914}],"down_context":[{"change":3,"pos":2914}],"flag":"BLOCK","start":1312,"end":1381,"inode":{"change":3,"pos":2363}}},"contents":[{"Add":{"text":"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1312"}},{"Add":{"text":"projectGetHandler :: Handler App App Project","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1357"}},{"Add":{"text":"projectGetHandler = ok","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1380"}}]}},{"Replacement":{"inode":{"change":3,"pos":2363},"path":"server/Quixotic/Snaplet/Projects.hs","line":37,"ins":{"up_context":[{"change":3,"pos":3443}],"down_context":[],"flag":"BLOCK","start":1382,"end":1564,"inode":{"change":3,"pos":2363}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3443},"to":{"change":3,"start":3443,"end":3516},"introduced_by":3}],"inode":{"change":3,"pos":2363}},"ins_contents":[{"Add":{"text":"projectListHandler :: Handler App App [QDBProject]","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1432"}},{"Add":{"text":"projectListHandler = do","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1456"}},{"Add":{"text":" QDB{..} <- view qdb <$> with qm get","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1494"}},{"Add":{"text":" uid <- requireUserId","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1517"}},{"Add":{"text":" liftPG . runReaderT $ findUserProjects uid","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1562"}},{"Add":{"text":"","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1563"}}],"del_contents":[{"Del":{"text":"projectListHandler :: Handler App App [Project]","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3490"}},{"Del":{"text":"projectListHandler = ok ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3515"}}]}},{"Edit":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":8,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":5625},"to":{"change":2,"start":4291,"end":4322},"introduced_by":2}],"inode":{"change":3,"pos":5424}}},"contents":[{"Del":{"text":"import qualified Data.Map as M","pos":"EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC:4321"}}]}},{"Edit":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":11,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":5683},"to":{"change":3,"start":5683,"end":5704},"introduced_by":3}],"inode":{"change":3,"pos":5424}}},"contents":[{"Del":{"text":"import Quixotic.Json","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:5703"}}]}},{"Replacement":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":35,"ins":{"up_context":[{"change":3,"pos":6348}],"down_context":[{"change":3,"pos":3428}],"flag":"BLOCK","start":1566,"end":1618,"inode":{"change":3,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6348},"to":{"change":3,"start":6348,"end":6393},"introduced_by":3}],"inode":{"change":3,"pos":5424}},"ins_contents":[{"Add":{"text":"loggedIntervalsHandler :: Handler App App WorkIndex","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1617"}}],"del_contents":[{"Del":{"text":"loggedIntervalsHandler :: Handler App App ()","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:6392"}}]}},{"Replacement":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":40,"ins":{"up_context":[{"change":3,"pos":3515}],"down_context":[{"change":3,"pos":6631}],"flag":"BLOCK","start":1619,"end":1661,"inode":{"change":3,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3515},"to":{"change":3,"start":3515,"end":3565},"introduced_by":3},{"previous":"","flag":"DELETED","from":{"change":3,"pos":3565},"to":{"change":3,"start":6518,"end":6581},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6518},"to":{"change":3,"start":6518,"end":6581},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6581},"to":{"change":2,"start":4461,"end":4546},"introduced_by":2}],"inode":{"change":3,"pos":5424}},"ins_contents":[{"Add":{"text":" liftPG . runReaderT $ readWorkIndex pid","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1660"}}],"del_contents":[{"Del":{"text":" widx <- liftPG . runReaderT $ readWorkIndex pid","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:3564"}},{"Del":{"text":" modifyResponse $ addHeader \"content-type\" \"application/json\"","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:6580"}},{"Del":{"text":" writeLBS . A.encode . fmap (fmap IntervalJ) $ M.mapKeysWith (++) (^._BtcAddr) widx","pos":"EZQG2APB36DDMIAYDPPDGOIXOD7K2RZZSGC2NKGZIHB2HZBTW7EQC:4545"}}]}},{"Replacement":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":42,"ins":{"up_context":[{"change":3,"pos":6632}],"down_context":[{"change":3,"pos":3650}],"flag":"BLOCK","start":1662,"end":1704,"inode":{"change":3,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6632},"to":{"change":3,"start":6632,"end":6669},"introduced_by":3}],"inode":{"change":3,"pos":5424}},"ins_contents":[{"Add":{"text":"payoutsHandler :: Handler App App Payouts","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1703"}}],"del_contents":[{"Del":{"text":"payoutsHandler :: Handler App App ()","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:6668"}}]}},{"Replacement":{"inode":{"change":3,"pos":5424},"path":"server/Quixotic/Snaplet/WorkLog.hs","line":49,"ins":{"up_context":[{"change":3,"pos":6779}],"down_context":[{"change":3,"pos":3781}],"flag":"BLOCK","start":1705,"end":1736,"inode":{"change":3,"pos":5424}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6823},"to":{"change":3,"start":6823,"end":6886},"introduced_by":3},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":6886},"to":{"change":3,"start":4209,"end":4266},"introduced_by":3}],"inode":{"change":3,"pos":5424}},"ins_contents":[{"Add":{"text":" pure $ payouts df ptime widx","pos":"XTBSG4C7SCZUFOU2BTNFR6B6TCGYI35BWUV4PVTS3N7KNH5VEARQC:1735"}}],"del_contents":[{"Del":{"text":" modifyResponse $ addHeader \"content-type\" \"application/json\"","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:6885"}},{"Del":{"text":" writeLBS . A.encode . PayoutsJ $ payouts df ptime widx","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:4265"}}]}}],"owner":"nuttycom","repo":"aftok","token":"RUcixJJeM3T46W6j00bNFBe0JnC2xOSsW3Jir1IaIU8=","login":null}

…

Dependencies

Change contents

Review