Fix ghc-modi compat exe

src/GHCMod.hs

@@ -190,10 +190,8 @@ usage =
  \    - boot\n\
  \         Internal command used by the emacs frontend.\n\
  \\n\
- \    - legacy-interactive [OPTIONS...]\n\
+ \    - legacy-interactive\n\
- \         ghc-modi compatibility mode.\n\
+ \         ghc-modi compatibility mode.\n"
- \      *Options*\n"
-   ++ (unlines $ indent <$> optionUsage indent globalArgSpec)
  where
    indent = ("    "++)
 

src/GHCModi.hs

@@ -7,10 +7,13 @@ module Main where
 
 import System.Exit
 import System.Process
+import System.FilePath
 import System.Environment
+import Paths_ghc_mod
 
 main :: IO ()
 main = do
   args <- getArgs
-  h <- spawnProcess "ghc-mod" $ ["legacy-interactive"] ++ args
+  bindir <- getBinDir
+  h <- spawnProcess (bindir </> "ghc-mod") $ ["legacy-interactive"] ++ args
   exitWith =<< waitForProcess h