Some minor renaming.
[?]
Jan 17, 2015, 8:05 PM
MK7ODWHUEPOMAEVK5D3OWW25QRAXKDO4ZVJKNZGWKB5434MP2LNACDependencies
- [2]
7XN3I3QJAdd 'loggedIntervals' endpoint. - [3]
64C6AWH6Rename Ananke -> Quixotic, project reboot. - [4]
WZUHEZSBStart of migration back toward snap. - [5]
LAROLAYUWIP - [6]
TCOAKCGGCompleted conversion to snap. - [7]
RSEB2NFGReplacing Snap with Scotty. - [8]
64VI73NPServer now compiles using abstracted SQLite - [9]
WFZDMVUXRename ADB -> QDB - [10]
2Y2QZFVFSwitch to more modern cabal2nix-based workflow. - [11]
ADMKQQGCInitial empty Snap project.
Change contents
- replacement in server/Main.hs at line 35
[ ("logStart/:btcAddr", handleLogRequest qdb StartWork), ("logEnd/:btcAddr", handleLogRequest qdb StopWork), ("loggedIntervals/:btcAddr", loggedIntervals qdb), ("payouts", currentPayouts qdb)[ ("logStart/:btcAddr", logWorkHandler qdb StartWork), ("logEnd/:btcAddr", logWorkHandler qdb StopWork), ("loggedIntervals/:btcAddr", loggedIntervalsHandler qdb), ("payouts", payoutsHandler qdb) - replacement in server/Main.hs at line 73
handleLogRequest :: QDB IO a -> EventType -> ReaderT a Snap ()handleLogRequest qdb ev = dologWorkHandler :: QDB IO a -> EventType -> ReaderT a Snap ()logWorkHandler qdb ev = do - replacement in server/Main.hs at line 83
loggedIntervals :: QDB IO a -> ReaderT a Snap ()loggedIntervals qdb = dologgedIntervalsHandler :: QDB IO a -> ReaderT a Snap ()loggedIntervalsHandler qdb = do - replacement in server/Main.hs at line 90
currentPayouts :: QDB IO a -> ReaderT a Snap ()currentPayouts qdb = dopayoutsHandler :: QDB IO a -> ReaderT a Snap ()payoutsHandler qdb = do