hce

### Keybase proof

I hereby claim:

  * I am hce on github.
  * I am bobpage (https://keybase.io/bobpage) on keybase.
  * I have a public key ASDQLfl9KjuarPkSHUpJia9IkamAKF4ZZURkQYes90DJPgo

To claim this, I am signing this object:

hce

foo

hce

import Data.Map hiding (map)

newtype IOListBuilder a = IOListBuilder { makeLB :: (a, IOList) }

data IOList             = StringEntry String | Sublist [IOList] | EmptyEntry | DictEntry String String

iolistToString :: Map String String -> IOList -> String
iolistToString dict (StringEntry s)         = s
iolistToString dict (Sublist [])            = ""
iolistToString dict (EmptyEntry)            = ""

hce

rent 
=INFO REPORT==== 15-Dec-2010::12:53:01 ===
[starting,"FreeBSD-8.1-RELEASE-ia64-bootonly.torrent"]
=PROGRESS REPORT==== 15-Dec-2010::12:53:01 ===
          supervisor: {<0.124.0>,etorrent_t_sup}
             started: [{pid,<0.125.0>},{name,control},{mfargs,{etorrent_t_control,start_link,[1,"FreeBSD-8.1-RELEASE-ia64-bootonly.torrent","-ETd011-472163830052"]}},{restart_type,permanent},{shutdown,20000},{child_type,worker}]

=PROGRESS REPORT==== 15-Dec-2010::12:53:01 ===
          supervisor: {<0.126.0>,etorrent_io_sup}
             started: [{pid,<0.127.0>},{name,{1,directory}},{mfargs,{etorrent_io,start_link,[1,[{<<"announce">>,<<"http://torrents.freebsd.org:8080/announce">>},{<<"creation date">>,1279772135},{<<"info">>,[{<<"files">>,[[{<<"length">>,98170880},{<<"path">>,[<<"FreeBSD-8.1-RELEASE-ia64-bootonly.iso">>]}]]},{<<"name">>,<<"FreeBSD-8.1-RELEASE-ia64-bootonly">>},{<<"piece length">>,262144},{<<"pieces">>,<<":G"[156,208,20,208,249,56,101,208,17,76,53,110,77,203,224,104,246,165,172,84,51,151,225,62,

hce

From 661ee81f88d7a5c923eafed3a82c41624a396396 Mon Sep 17 00:00:00 2001
From: Hans-Christian Esperer <hc@hcesperer.org>
Date: Fri, 16 Jul 2010 19:57:07 +0200
Subject: [PATCH] Fix wrong counter

---
 src/yaws_server.erl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/src/yaws_server.erl b/src/yaws_server.erl