diff --git a/ghci b/ghci index 5e4090a..04c714d 100644 --- a/ghci +++ b/ghci @@ -1,4 +1,4 @@ -:set prompt "λ: " +:set prompt "λ > " {- :set -Wall -} let ghciEscapeShellArg arg = "'" ++ concatMap (\c -> if c == '\'' then "'\"'\"'" else [c]) arg ++ "'"