We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 4e8baf5 commit e0733ffCopy full SHA for e0733ff
ide/rocqide/ideutils.ml
@@ -219,10 +219,10 @@ let do_convert s =
219
Glib.Convert.convert s ~to_codeset:"UTF-8" ~from_codeset:enc
220
in
221
let s =
222
- if Glib.Utf8.validate s then (Minilib.log "Input is UTF-8"; s)
223
- else match encoding#get with
224
- |Preferences.Eutf8 | Preferences.Elocale -> from_loc ()
225
- |Emanual enc -> try from_manual enc with _ -> from_loc ()
+ match encoding#get with
+ | Eutf8 when Glib.Utf8.validate s -> (Minilib.log "Input is UTF-8"; s)
+ | Eutf8 | Elocale -> from_loc ()
+ | Emanual enc -> try from_manual enc with _ -> from_loc ()
226
227
Utf8_convert.f s
228
0 commit comments