diff --git a/src/Graphics/Vty/Error.hs b/src/Graphics/Vty/Error.hs
deleted file mode 100644
--- a/src/Graphics/Vty/Error.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-module Graphics.Vty.Error
-    where
-
-import Control.Exception
-
-
--- | The type of exceptions specific to vty.
---
--- These have fully qualified names by default since, IMO, exception handling requires this.
-data VtyException
-    =  VtyFailure String -- | Uncategorized failure specific to vty.
diff --git a/test/interactive_terminal_test.hs b/test/interactive_terminal_test.hs
--- a/test/interactive_terminal_test.hs
+++ b/test/interactive_terminal_test.hs
@@ -74,9 +74,10 @@
 |]
     wait_for_return
     results <- do_test_menu 1
-    env_attributes <- mapM ( \env_name -> catch ( Env.getEnv env_name >>= return . (,) env_name ) 
-                                                ( \ (_ :: SomeException) -> return (env_name, "") ) 
-                           ) 
+    env_attributes <- mapM ( \env_name -> Control.Exception.catch
+                                            ( Env.getEnv env_name >>= return . (,) env_name )
+                                            ( \ (_ :: SomeException) -> return (env_name, "") )
+                           )
                            [ "TERM", "COLORTERM", "LANG", "TERM_PROGRAM", "XTERM_VERSION" ]
     t <- terminal_handle
     let results_txt = show env_attributes ++ "\n" 
diff --git a/vty.cabal b/vty.cabal
--- a/vty.cabal
+++ b/vty.cabal
@@ -1,5 +1,5 @@
 name:                vty
-version:             4.7.2
+version:             4.7.3
 license:             BSD3
 license-file:        LICENSE
 author:              AUTHORS
@@ -54,7 +54,6 @@
   exposed-modules:     Graphics.Vty
                        Graphics.Vty.Attributes
                        Graphics.Vty.DisplayRegion
-                       Graphics.Vty.Error
                        Graphics.Vty.Image
                        Graphics.Vty.Inline
                        Graphics.Vty.LLInput
