diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-08-31 19:38:51 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-08-31 19:38:51 -0400 |
| commit | 9c35871c2833272c3f5ec9334c2a264aaf4dc21c (patch) | |
| tree | 5bf84abc741e99b479ff238df83cd9321bd80a58 /doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn | |
| parent | 2df72d14b6933c9ae57b0c73dd78c88b05f987e9 (diff) | |
typo
Diffstat (limited to 'doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn')
| -rw-r--r-- | doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn b/doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn index 29a6737bc..be83daa31 100644 --- a/doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn +++ b/doc/design/assistant/blog/day_70__adding_ssh_remotes.mdwn @@ -51,13 +51,13 @@ I had only been using that TChan because I wanted a way to block while the queue was empty. But now that I'm more comfortable with STM, I know how to do that easily using a list: -[[!format haskell "" +[[!format haskell """ getQueuedTransfer q = atomically $ do sz <- readTVar (queuesize q) if sz < 1 then retry -- blocks until size changes else ... -""]] +"""]] Ah, the times before [STM](http://en.wikipedia.org/wiki/Software_transactional_memory) were dark times indeed. I'm writing more and more STM code lately, building |