diff --git a/System/Hardware/Serialport.hs b/System/Hardware/Serialport.hs
--- a/System/Hardware/Serialport.hs
+++ b/System/Hardware/Serialport.hs
@@ -1,18 +1,18 @@
 {-# LANGUAGE CPP #-}
-{- | 
-@
-s <- openSerial \"\/dev\/ttyUSB0\" B9600 8 One NoParity NoFlowControl
 
-forM_ \"AT\\r\" $ sendChar s
-
--- from Control.Monad.Loops
-response <- unfoldM (recvChar s)
-
-print response
+-- |
+-- > s <- openSerial \"\/dev\/ttyUSB0\" B9600 8 One NoParity NoFlowControl
+-- > 
+-- > forM_ \"AT\\r\" $ sendChar s
+-- > 
+-- > -- from Control.Monad.Loops
+-- > response <- unfoldM (recvChar s)
+-- > 
+-- > print response
+-- > 
+-- > closeSerial s
+-- 
 
-closeSerial s
-@
--}
 module System.Hardware.Serialport (
   -- * Types
    StopBits(..)
diff --git a/serialport.cabal b/serialport.cabal
--- a/serialport.cabal
+++ b/serialport.cabal
@@ -1,5 +1,5 @@
 Name:           serialport
-Version:        0.1.0.1
+Version:        0.1.0.2
 Cabal-Version:  >= 1.2
 Build-Type:     Simple
 license:        BSD3