(non)utf8 input in GUI

This commit is contained in:
aarne
2004-08-12 18:29:35 +00:00
parent 35f8c76210
commit ca280d8d31
3 changed files with 16 additions and 4 deletions

View File

@@ -29,7 +29,7 @@ sessionLineJ isNew env = do
---- the Boolean is a temporary hack to have two parallel GUIs
editLoopJnewX :: Bool -> CEnv -> SState -> IO ()
editLoopJnewX isNew env state = do
c <- getCommandUTF
c <- getCommandUTF (isCEnvUTF8 env state) ----
case c of
CQuit -> return ()