Merge branch 'master' of https://stijnsanders@github.com/stijnsanders…

…/TMongoWire.git Conflicts: bsonDoc.pas
stijnsanders · Jun 22, 2012 · 5d5a197 · 5d5a197
2 parents 72ad0ac + aae7eed
commit 5d5a197
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bsonDoc.pas b/bsonDoc.pas
@@ -207,7 +207,7 @@ procedure TBSONDocument.Set_Item(const Key: WideString; Value: OleVariant);
       SetLength(FSorted,FElementSize);
      end;
     for i:=FElementIndex-1 downto FGotSorted do FSorted[i+1]:=FSorted[i];//Move?
-    FGotIndex:=FElementIndex;
+    FGotIndex:=FElementIndex;
     inc(FElementIndex);
     FSorted[FGotSorted]:=FGotIndex;
     FElements[FGotIndex].Key:=Key;