diff --git a/Codec/BMP.hs b/Codec/BMP.hs
--- a/Codec/BMP.hs
+++ b/Codec/BMP.hs
@@ -152,6 +152,7 @@
  = do	h	<- openBinaryFile fileName WriteMode
 	hPutBMP h bmp
 	hFlush h
+	hClose h
 
 
 -- | Put a BMP image to a file handle.
diff --git a/bmp.cabal b/bmp.cabal
--- a/bmp.cabal
+++ b/bmp.cabal
@@ -1,5 +1,5 @@
 Name:                bmp
-Version:             1.1.1.1
+Version:             1.1.1.2
 License:             MIT
 License-file:        LICENSE
 Author:              Ben Lippmeier
@@ -8,7 +8,7 @@
 Cabal-Version:       >=1.6
 Stability:           stable
 Category:            Codec
-Homepage:            http://code.haskell.org/~benl/code/bmp-head
+Homepage:            http://code.ouroborus.net/bmp
 Bug-reports:         bmp@ouroborus.net
 Description:
 	Read and write uncompressed BMP image files. 100% robust Haskell implementation.
