From ffb0b7c6ce9d92254a743d45373d2c0ec9049cc5 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 10 Dec 2016 22:26:39 +0100
Subject: [PATCH] Removed Interact.hs, not needed any more with modern tools.
---
Interact.hs | 34 ----------------------------------
1 file changed, 34 deletions(-)
delete mode 100644 Interact.hs
diff --git a/Interact.hs b/Interact.hs
deleted file mode 100644
index 4d24904c5..000000000
--- a/Interact.hs
+++ /dev/null
@@ -1,34 +0,0 @@
--- Get an interactive shell with the right packages to load
--- pandoc modules.
-
--- To use:
--- runghc Interact.hs
--- then,
--- :l Text/Pandoc.hs
--- (or whichever package you like)
-
--- You must have first done a 'cabal configure' or 'cabal install'
-
--- Note: Interact.hs doesn't work with Cabal >= 1.18. I recommend
--- using cabal sandboxes and the new 'cabal repl' command if you are
--- using a recent version.
-
-import System.Process
-import Distribution.Simple.LocalBuildInfo
-import Distribution.Package
-import Distribution.Version
-import Data.List (intercalate)
-
-main = do
- setupConfig' <- readFile "dist/setup-config"
- let setupConfig = read $ unlines $ drop 1 $ lines setupConfig'
- let (Just (ComponentLocalBuildInfo { componentPackageDeps = deps })) = libraryConfig setupConfig
- let packageSpecs = map (toPackageSpec . snd) deps
- let args = ["-optP-include", "-optP../dist/build/autogen/cabal_macros.h","-cpp","-I../dist/build/autogen","-i../dist/build/autogen"] ++ concatMap (\p -> ["-package",p]) packageSpecs
- print args
- ph <- runProcess "ghci" args (Just "src") Nothing Nothing Nothing Nothing
- waitForProcess ph
-
-toPackageSpec pkg = pkgN ++ "-" ++ pkgV
- where (PackageName pkgN) = pkgName pkg
- pkgV = intercalate "." $ map show $ versionBranch $ pkgVersion pkg