diff --git a/atsynedit_cmp/atsynedit_cmp_html.pas b/atsynedit_cmp/atsynedit_cmp_html.pas
index 1998f96..01b6ced 100644
--- a/atsynedit_cmp/atsynedit_cmp_html.pas
+++ b/atsynedit_cmp/atsynedit_cmp_html.pas
@@ -487,6 +487,7 @@ function TATCompletionOptionsHtml.IsValidTag(const S: string; PartialAllowed: bo
   if ListOfTags=nil then
   begin
     ListOfTags:= TStringList.Create;
+    ListOfTags.UseLocale:= false;
     ListOfTags.Sorted:= true;
     ListOfTags.CaseSensitive:= false;
     Provider.GetTags(ListOfTags);
diff --git a/atsynedit_cmp/atsynedit_cmp_html_provider.pas b/atsynedit_cmp/atsynedit_cmp_html_provider.pas
index 9b9babd..0ff8702 100644
--- a/atsynedit_cmp/atsynedit_cmp_html_provider.pas
+++ b/atsynedit_cmp/atsynedit_cmp_html_provider.pas
@@ -104,6 +104,7 @@ procedure TATHtmlBasicProvider.GetTags(L: TStringList);
   S, SKey, SVal: string;
 begin
   L.Clear;
+  L.UseLocale:= false;
   L.Sorted:= true;
 
   for S in ListAll do
@@ -119,6 +120,7 @@ procedure TATHtmlBasicProvider.GetTagProps(const ATag: string; L: TStringList);
   Sep: TATStringSeparator;
 begin
   L.Clear;
+  L.UseLocale:= false;
   L.Sorted:= true;
 
   for S in ListGlobals do
@@ -166,6 +168,7 @@ procedure TATHtmlBasicProvider.GetTagPropValues(const ATag, AProp: string; L: TS
   Sep: TATStringSeparator;
 begin
   L.Clear;
+  L.UseLocale:= false;
   L.Sorted:= true;
 
   if (AProp='type') and IsTagWithMimeType(ATag) then