diff --git a/.ghci b/.ghci
new file mode 100644
index 0000000..c2a1c26
--- /dev/null
+++ b/.ghci
@@ -0,0 +1,12 @@
+:set prompt " >>> "
+:set +t
+--:set -XOverloadedStrings
+--import qualified Data.ByteString as S
+--import qualified Data.ByteString.Lazy as L
+--import qualified Data.Binary as B
+
+--import System.IO.Russian.Console
+
+let ghciEscapeShellArg arg = "'" ++ concatMap (\x -> if x == '\'' then "'\"'\"'" else [x]) arg ++ "'"                             
+:def! search return . (":! hoogle --color --count=20 " ++) . ghciEscapeShellArg                                                   
+:def! doc return . (":! hoogle --info " ++) . ghciEscapeShellArg