diff --git a/Gtc/gtc.hs b/Gtc/gtc.hs
--- a/Gtc/gtc.hs
+++ b/Gtc/gtc.hs
@@ -7,11 +7,12 @@
 import Gt.Core
 import Gt.Langs
 import Control.Monad.Trans
-import System.Console.Haskeline hiding (catch)
+import System.Console.Haskeline
 import System.Environment
 import System.Exit
 import System.Posix.Terminal
 import qualified System.Environment.UTF8 as U
+import qualified Control.Exception.Extensible as E
 
 usage :: IO()
 usage =
@@ -72,7 +73,7 @@
            }
 
 getHomeDir :: IO FilePath
-getHomeDir = catch (getEnv "HOME") (\_ -> return "")
+getHomeDir =  getEnv "HOME" `E.catch` (const $ return "" :: E.SomeException -> IO String)
 
 interactiveLoop' :: Lang -> Lang -> IO()
 interactiveLoop' from to =
diff --git a/gt-tools.cabal b/gt-tools.cabal
--- a/gt-tools.cabal
+++ b/gt-tools.cabal
@@ -1,5 +1,5 @@
 name:                   gt-tools
-version:                0.1.4.3
+version:                0.1.4.4
 cabal-version:          >= 1.8
 build-type:             Simple
 license:                GPL
@@ -16,7 +16,7 @@
 category:               Tools
 author:                 Mikhail S. Pobolovets
 stability:              stable
-tested-with:            GHC==6.12.1
+tested-with:            GHC==6.12.1, GHC==7.6.1
 data-files:             LICENSE README Gtg/main.glade
 data-dir:               ""
 extra-source-files:     Setup.lhs
@@ -34,6 +34,7 @@
     build-depends:
                         base >= 4.2 && < 5,
                         containers,
+                        extensible-exceptions,
                         haskeline,
                         HTTP,
                         json,