From: Carl Yeksigian <carl@apache.org>
Date: Fri, 7 Jun 2013 00:53:32 +0000 (-0400)
Subject: THRIFT-2002: Update Maybe to use Data.Maybe to prevent failure of the debug test
X-Git-Url: https://source.supwisdom.com/gerrit/gitweb?a=commitdiff_plain;h=0928eda77155301a1160bf4ae50faccefa5bd6e6;p=common%2Fthrift.git

THRIFT-2002: Update Maybe to use Data.Maybe to prevent failure of the debug test
Client: haskell
Patch: Carl Yeksigian
---

diff --git a/test/hs/DebugProtoTest_Main.hs b/test/hs/DebugProtoTest_Main.hs
index f6a031cf..29393db3 100755
--- a/test/hs/DebugProtoTest_Main.hs
+++ b/test/hs/DebugProtoTest_Main.hs
@@ -24,7 +24,7 @@ module Main where
 
 import qualified Control.Exception
 import qualified Data.ByteString.Lazy as DBL
-import qualified Maybe
+import qualified Data.Maybe
 import qualified Network
 
 import Thrift.Protocol.Binary
@@ -127,7 +127,7 @@ instance SIface.Srv_Iface InheritedHandler where
 instance IIface.Inherited_Iface InheritedHandler where
     identity _ arg = do
         ThriftTestUtils.serverLog $ "Got identity method: " ++ show arg
-        return $ Maybe.fromJust arg
+        return $ Data.Maybe.fromJust arg
 
 client :: (String, Network.PortID) -> IO ()
 client addr = do