X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Frunghc%2Frunghc.hs;h=07aec8cde2a98f6932d3e57b435291f886de9e75;hb=921d73679d8238a16878fce91b656b129ba2b8b4;hp=47615def3a29fb6f0ea34dba08f11b56e768cdac;hpb=bb57db143d9c0207e4c2c4c24ceb688714c2980d;p=ghc-hetmet.git

diff --git a/utils/runghc/runghc.hs b/utils/runghc/runghc.hs
index 47615de..07aec8c 100644
--- a/utils/runghc/runghc.hs
+++ b/utils/runghc/runghc.hs
@@ -22,13 +22,8 @@
 
 module Main (main) where
 
-import Paths_runghc
-
 import Control.Exception
-import Data.Char
-import Data.List
 import Data.Monoid
-import Data.Version
 import System.Cmd
 import System.Directory
 import System.Environment
@@ -85,7 +80,7 @@ parseRunGhcFlags = f mempty
 
 printVersion :: IO ()
 printVersion = do
-    putStrLn ("runghc " ++ showVersion version)
+    putStrLn ("runghc " ++ VERSION)
 
 printUsage :: IO ()
 printUsage = do