mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

blog for the day

Browse source
This commit is contained in:
Joey Hess 2012-10-29 17:56:29 -04:00
parent 87ba4f8677
commit d5945eeb4c
1 changed files with 15 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

15
doc/design/assistant/blog/day_118__monadic_discontinuity.mdwn Normal file
View file

@ -0,0 +1,15 @@
Spent most of the past day moving the assistant into a monad of its own
that encapsulates all the communications channels for its threads. This
involved modifiying nearly every line of code in the whole assistant.
Typical change:
[[!format haskell """
handleConnection threadname st dstatus scanremotes pushnotifier = do
reconnectRemotes threadname st dstatus scanremotes (Just pushnotifier)
=<< networkRemotes st
handleConnection = reconnectRemotes True =<< networkRemotes
"""]]
So, it's getting more readable..