[ghci] pretty print pretty please

1 files changed, 9 insertions, 2 deletions

diff --git a/ghci.conf b/ghci.conf
index f98243a..25ddd80 100644
--- a/ghci.conf
+++ b/ghci.conf
@@ -1,6 +1,13 @@
--- :set -Wall
-:set prompt "λ> "
 :m Data.Functor Control.Applicative Data.List Control.Monad Data.Maybe Control.Arrow
 :set -XGADTs -XArrows -XUnicodeSyntax
+
+:set +t
+:set prompt "λ> "
+
 :def hoogle \s -> return $ ":! hoogle --count=15 " ++ show s
 :def pf \s -> return $ ":! pointfree " ++ show s
+
+:m Text.Show.Pretty
+:def! nopretty \_ -> return ":set -interactive-print System.IO.print"
+:def! pretty \_ -> return ":set -interactive-print pPrint"
+:pretty