diff --git a/network-multicast.cabal b/network-multicast.cabal
--- a/network-multicast.cabal
+++ b/network-multicast.cabal
@@ -1,5 +1,5 @@
 name:               network-multicast
-version:            0.0.9
+version:            0.0.10
 copyright:          2008-2013 Audrey Tang
 license:            PublicDomain
 license-file:       LICENSE
diff --git a/src/Network/Multicast.hsc b/src/Network/Multicast.hsc
--- a/src/Network/Multicast.hsc
+++ b/src/Network/Multicast.hsc
@@ -73,7 +73,7 @@
 -- >         print (msg, addr) in loop
 --
 multicastReceiver :: HostName -> PortNumber -> IO Socket
-multicastReceiver host port = bracketOnError get close setup
+multicastReceiver host port = bracketOnError get sClose setup
   where
     get :: IO Socket
     get = do
