From 51ec98c3f584b389b31ffa6a6abc3643e9bb754a Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Thu, 11 Mar 2010 18:54:48 +0900
Subject: [PATCH] slight sig change

---
 Data/Time/W3C/Parser.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/Data/Time/W3C/Parser.hs b/Data/Time/W3C/Parser.hs
index 539a024..64f96b2 100644
--- a/Data/Time/W3C/Parser.hs
+++ b/Data/Time/W3C/Parser.hs
@@ -5,11 +5,12 @@ module Data.Time.W3C.Parser
 
 import qualified Text.Parsec as P
 
+import Data.Convertible
 import Data.Time.W3C.Parser.Parsec
 import Data.Time.W3C.Types
 
-parse :: String -> Maybe W3CDateTime
+parse :: Convertible W3CDateTime t => String -> Maybe t
 parse src
     = case P.parse w3cDateTime "" src of
-        Right w3c -> Just w3c
+        Right w3c -> Just (convert w3c)
         Left  _   -> Nothing
-- 
2.40.0