diff options
Diffstat (limited to 'src-3.0/GF/System')
| -rw-r--r-- | src-3.0/GF/System/UseReadline.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src-3.0/GF/System/UseReadline.hs b/src-3.0/GF/System/UseReadline.hs index c4a8f9239..7a4999850 100644 --- a/src-3.0/GF/System/UseReadline.hs +++ b/src-3.0/GF/System/UseReadline.hs @@ -18,6 +18,8 @@ import System.Console.Readline fetchCommand :: String -> IO (String) fetchCommand s = do + setCompletionAppendCharacter Nothing + setBasicQuoteCharacters "" res <- readline s case res of Nothing -> return "q" |