Replace deprecated String.capitalize with String.capitalize_ascii
This commit is contained in:
parent
9dcb51fea8
commit
098d2f854b
|
@ -383,7 +383,7 @@ let visible_modules () =
|
||||||
Array.fold_left
|
Array.fold_left
|
||||||
(fun acc fname ->
|
(fun acc fname ->
|
||||||
if Filename.check_suffix fname ".cmi" then
|
if Filename.check_suffix fname ".cmi" then
|
||||||
String_set.add (String.capitalize (Filename.chop_suffix fname ".cmi")) acc
|
String_set.add (String.capitalize_ascii (Filename.chop_suffix fname ".cmi")) acc
|
||||||
else
|
else
|
||||||
acc)
|
acc)
|
||||||
acc
|
acc
|
||||||
|
|
Loading…
Reference in New Issue