From 7a19b177f336109ad0e5329f77e1c49fe7422aad Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Thu, 10 Oct 2013 10:19:23 +0300
Subject: [PATCH] Added a patch for httpd-shed and network 2.4.2

---
 patching/patches/httpd-shed-0.4.patch | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 patching/patches/httpd-shed-0.4.patch

diff --git a/patching/patches/httpd-shed-0.4.patch b/patching/patches/httpd-shed-0.4.patch
new file mode 100644
index 00000000..eb556f4c
--- /dev/null
+++ b/patching/patches/httpd-shed-0.4.patch
@@ -0,0 +1,12 @@
+diff -ru orig/Network/Shed/Httpd.hs new/Network/Shed/Httpd.hs
+--- orig/Network/Shed/Httpd.hs	2013-10-10 10:19:03.153688450 +0300
++++ new/Network/Shed/Httpd.hs	2013-10-10 10:19:02.000000000 +0300
+@@ -139,7 +139,7 @@
+                                  hClose h
+                    _                      -> hClose h
+                  return ()
+-           ) `finally` sClose sock
++           ) `finally` Network.Socket.sClose sock
+   where 
+       loopIO m          = do m
+                              loopIO m