diff --git a/Check.hs b/Check.hs
--- a/Check.hs
+++ b/Check.hs
@@ -18,7 +18,7 @@
 ----------------------------------------------------------------
 
 check :: Options -> String -> IO [String]
-check opt fileName = withGHC $ checkIt `gcatch` handleErrMsg
+check opt fileName = withGHC' fileName $ checkIt `gcatch` handleErrMsg
   where
     checkIt = do
         (file,readLog) <- initializeGHC opt fileName options True
diff --git a/GHCApi.hs b/GHCApi.hs
--- a/GHCApi.hs
+++ b/GHCApi.hs
@@ -15,13 +15,16 @@
 ----------------------------------------------------------------
 
 withGHC :: Alternative m => Ghc (m a) -> IO (m a)
-withGHC body = ghandle ignore $ runGhc (Just libdir) $ do
+withGHC = withGHC' "Dummy"
+
+withGHC' :: Alternative m => FilePath -> Ghc (m a) -> IO (m a)
+withGHC' file body = ghandle ignore $ runGhc (Just libdir) $ do
     dflags <- getSessionDynFlags
     defaultCleanupHandler dflags body
   where
     ignore :: Alternative m => SomeException -> IO (m a)
     ignore e = do
-        hPutStr stderr "Dummy:0:0:Error:"
+        hPutStr stderr $ file ++ ":0:0:Error:"
         hPrint stderr e
         exitSuccess
 
diff --git a/elisp/ghc-comp.el b/elisp/ghc-comp.el
--- a/elisp/ghc-comp.el
+++ b/elisp/ghc-comp.el
@@ -64,6 +64,7 @@
 (defvar ghc-loaded-module nil)
 
 (defun ghc-comp-init ()
+  (add-hook 'find-file-hook 'ghc-import-module)
   (let* ((syms '(ghc-module-names
 		 ghc-language-extensions
 		 ghc-option-flags
@@ -226,8 +227,6 @@
 ;;;
 ;;; Loading keywords
 ;;;
-
-(add-hook 'find-file-hook 'ghc-import-module)
 
 (defun ghc-import-module ()
   (interactive)
diff --git a/elisp/ghc-info.el b/elisp/ghc-info.el
--- a/elisp/ghc-info.el
+++ b/elisp/ghc-info.el
@@ -14,7 +14,7 @@
   (interactive "P")
   (let* ((modname (or (ghc-find-module-name) "Main"))
 	 (expr0 (ghc-things-at-point))
-	 (expr (if ask (ghc-read-expression expr0) expr0))
+	 (expr (if (or ask (not expr0)) (ghc-read-expression expr0) expr0))
 	 (file (buffer-file-name))
 	 (cmds (list "info" file modname expr)))
     (ghc-display-information cmds nil)))
diff --git a/ghc-mod.cabal b/ghc-mod.cabal
--- a/ghc-mod.cabal
+++ b/ghc-mod.cabal
@@ -1,5 +1,5 @@
 Name:                   ghc-mod
-Version:                1.11.2
+Version:                1.11.3
 Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
 Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
 License:                BSD3