diff options
| author | krasimir <krasimir@chalmers.se> | 2009-08-25 18:35:33 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2009-08-25 18:35:33 +0000 |
| commit | dbf87958f9e0e16642a2824d5bbaa098d9db23d5 (patch) | |
| tree | 26e00556d92d2a88d8525c3f4b50326ee0f54eec | |
| parent | 8b3b2946b2757aa1a1596d8e0e97baa3f1eceddf (diff) | |
let the 'se utf8' command change the terminal codepage to 65001 on Windows
| -rw-r--r-- | src/GFI.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/GFI.hs b/src/GFI.hs index 5093884d9..17413e212 100644 --- a/src/GFI.hs +++ b/src/GFI.hs @@ -160,6 +160,7 @@ loop opts gfenv0 = do 'c':'p':c -> case reads c of [(cp,"")] -> setConsoleCP cp >> setConsoleOutputCP cp _ -> return () + "utf8" -> setConsoleCP 65001 >> setConsoleOutputCP 65001 _ -> return () #endif loopNewCPU $ gfenv {coding = cod} |