summaryrefslogtreecommitdiff
path: root/src/GF/Shell/JGF.hs
diff options
context:
space:
mode:
authoraarne <unknown>2004-08-12 18:29:35 +0000
committeraarne <unknown>2004-08-12 18:29:35 +0000
commitca280d8d31bd00f9ce19782d0a4761654d04a1c3 (patch)
tree56fdc854347e6843f4a4a4b09d88cdabe8a6f33c /src/GF/Shell/JGF.hs
parent35f8c762103b38e475651237964906865e07e9d4 (diff)
(non)utf8 input in GUI
Diffstat (limited to 'src/GF/Shell/JGF.hs')
-rw-r--r--src/GF/Shell/JGF.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Shell/JGF.hs b/src/GF/Shell/JGF.hs
index 44b6aad2b..f1ed6bfb7 100644
--- a/src/GF/Shell/JGF.hs
+++ b/src/GF/Shell/JGF.hs
@@ -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 ()