From fe16e5d64edfa6f7200ab3ebf6c8d14571574302 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sun, 24 Feb 2008 14:32:56 +0000 Subject: [PATCH] FIX #2073: Don't add empty lines to GHCI's history --- compiler/ghci/InteractiveUI.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/compiler/ghci/InteractiveUI.hs b/compiler/ghci/InteractiveUI.hs index 2594d13..8ff83f9 100644 --- a/compiler/ghci/InteractiveUI.hs +++ b/compiler/ghci/InteractiveUI.hs @@ -599,6 +599,7 @@ readlineLoop = do splatSavedSession case l of Nothing -> return Nothing + Just "" -> return (Just "") -- Don't put empty lines in the history Just l -> do io (addHistory l) str <- io $ consoleInputToUnicode True l -- 1.7.10.4