Pārlūkot izejas kodu

* set namevalueseparator to =, mantis #24116

git-svn-id: trunk@24451 -
marco 12 gadi atpakaļ
vecāks
revīzija
912d8f1c52
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  1. 1 0
      rtl/objpas/classes/stringl.inc

+ 1 - 0
rtl/objpas/classes/stringl.inc

@@ -1369,6 +1369,7 @@ begin
   FMap := TFPStrObjMap.Create;
   FMap.OnPtrCompare := @MapPtrCompare;
   FOnCompareText := @DefaultCompareText;
+  NameValueSeparator:='=';
   CheckSpecialChars;
 end;