Browse Source

* set namevalueseparator to =, mantis #24116

git-svn-id: trunk@24451 -
marco 12 years ago
parent
commit
912d8f1c52
1 changed files with 1 additions and 0 deletions
  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;