diff options
| author | Thomas Hallgren <th-github@altocumulus.org> | 2018-01-23 14:55:33 +0100 |
|---|---|---|
| committer | Thomas Hallgren <th-github@altocumulus.org> | 2018-01-23 14:55:33 +0100 |
| commit | 5164951e23b0d0d5da80562a740d4b5875ef8c3f (patch) | |
| tree | 0f17f8bbba0062871fe5c4e22072cbc2adb4ec60 /src | |
| parent | 96adbebca8eacbf9911b605cdff44187ab6d3847 (diff) | |
Remove "Warning: default encoding has changed from Latin-1 to UTF-8"
The warning is about a change that was made in GF 3.6 (June 2014) and has
probably outlived its purpose by now.
Diffstat (limited to 'src')
| -rw-r--r-- | src/compiler/GF/Compile/GetGrammar.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/compiler/GF/Compile/GetGrammar.hs b/src/compiler/GF/Compile/GetGrammar.hs index 0813d15d2..191c3aff9 100644 --- a/src/compiler/GF/Compile/GetGrammar.hs +++ b/src/compiler/GF/Compile/GetGrammar.hs @@ -52,9 +52,11 @@ getSourceModule opts file0 = let mi =mi0 {mflags=mflags mi0 `addOptions` opts, msrc=file0} optCoding' = renameEncoding `fmap` flag optEncoding (mflags mi0) case (optCoding,optCoding') of + {- (Nothing,Nothing) -> unless (BS.all isAscii raw) $ ePutStrLn $ file0++":\n Warning: default encoding has changed from Latin-1 to UTF-8" + -} (_,Just coding') -> when (coding/=coding') $ raise $ "Encoding mismatch: "++coding++" /= "++coding' |