From 63093c32f33ad1fcfef10d2ef6ef010c2b5471e9 Mon Sep 17 00:00:00 2001 From: hallgren Date: Thu, 8 Nov 2012 15:53:46 +0000 Subject: Eliminate warnings about deprecated use of catch and try This is also needed for compatibility with GHC 7.6. --- src/compiler/GFServer.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/compiler/GFServer.hs') diff --git a/src/compiler/GFServer.hs b/src/compiler/GFServer.hs index fc0dcf347..ac14804c0 100644 --- a/src/compiler/GFServer.hs +++ b/src/compiler/GFServer.hs @@ -8,7 +8,8 @@ import Control.Monad.State(StateT(..),get,gets,put) import Control.Monad.Error(ErrorT(..),Error(..)) import System.Random(randomRIO) import System.IO(stderr,hPutStrLn) -import System.IO.Error(try,isAlreadyExistsError) +import GF.System.Catch(try) +import System.IO.Error(isAlreadyExistsError) import System.Directory(doesDirectoryExist,doesFileExist,createDirectory, setCurrentDirectory,getCurrentDirectory, getDirectoryContents,removeFile,removeDirectory) -- cgit v1.2.3