nuttycom/aftok - Change MK7ODWHUEPOMAEVK5D3OWW25QRAXKDO4ZVJKNZGWKB5434MP2LNAC

Some minor renaming.

Created by Kris Nuttycombe on January 17, 2015

MK7ODWHUEPOMAEVK5D3OWW25QRAXKDO4ZVJKNZGWKB5434MP2LNAC

Dependencies

In channels

main

Change contents

Replacement in server/Main.hs at line 35 [4.5188]

B:BD[3.353] → [3.353:468]

B:BD[3.468] → [2.661:715]

∅:D[2.715] → [3.468:504]

B:BD[3.468] → [3.468:504]

  [ ("logStart/:btcAddr", handleLogRequest qdb StartWork)
  , ("logEnd/:btcAddr",   handleLogRequest qdb StopWork)
  , ("loggedIntervals/:btcAddr", loggedIntervals qdb)
  , ("payouts", currentPayouts qdb)

[3.353]

[5.6540]

  [ ("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 [4.5188]

B:BD[4.5696] → [3.556:649]

handleLogRequest :: QDB IO a -> EventType -> ReaderT a Snap ()
handleLogRequest qdb ev = do

[4.5696]

[3.649]

logWorkHandler :: QDB IO a -> EventType -> ReaderT a Snap ()
logWorkHandler qdb ev = do

Replacement in server/Main.hs at line 83 [4.5188]

B:BD[4.6063] → [2.716:790]

loggedIntervals :: QDB IO a -> ReaderT a Snap ()
loggedIntervals qdb = do

[4.6063]

[2.790]

loggedIntervalsHandler :: QDB IO a -> ReaderT a Snap ()
loggedIntervalsHandler qdb = do

Replacement in server/Main.hs at line 90 [4.5188]
∅:D[2.982] → [6.323:371]
B:BD[4.6063] → [6.323:371]
B:BD[6.371] → [3.885:910]
```
currentPayouts :: QDB IO a -> ReaderT a Snap ()
currentPayouts qdb = do 
```
[2.982]
[3.910]
```
payoutsHandler :: QDB IO a -> ReaderT a Snap ()
payoutsHandler qdb = do 
```