diff --git a/Data/UUID.hs b/Data/UUID.hs
--- a/Data/UUID.hs
+++ b/Data/UUID.hs
@@ -51,6 +51,7 @@
     b                        =  concat . (`replicate` "%02.2x%02.2x")
 instance Read UUID where
   readPrec                   =  lift $ do
+    skipSpaces
     [x0,x1,x2,x3]           <-  count 4 byte
     char '-'
     [x4,x5]                 <-  count 2 byte
diff --git a/system-uuid.cabal b/system-uuid.cabal
--- a/system-uuid.cabal
+++ b/system-uuid.cabal
@@ -1,5 +1,5 @@
 name                          : system-uuid
-version                       : 2.1.0
+version                       : 2.1.1
 category                      : System
 license                       : BSD3
 license-file                  : LICENSE