X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaGui.ml;h=b1b2a6ad3fa683c2856a9f4226bd547077534365;hb=726848939b8f9ade553a6dbf3586fc7b7c8299ee;hp=1f170cb912592b955a85a1294fcb2632f7571be1;hpb=f7f2a793b445a052138cd3df377a9e417f6e37c4;p=helm.git diff --git a/helm/software/matita/matitaGui.ml b/helm/software/matita/matitaGui.ml index 1f170cb91..b1b2a6ad3 100644 --- a/helm/software/matita/matitaGui.ml +++ b/helm/software/matita/matitaGui.ml @@ -903,7 +903,7 @@ class gui () = source_buffer#insert ~iter:(source_buffer#get_iter_at_mark `INSERT) s in let get_ligature word = - let len = MatitaGtkMisc.utf8_string_length word in + let len = String.length word in let aux_tex () = try for i = len - 1 downto 0 do