\r
if (first_idx != NULLT)\r
current_text = GetText(MyTextUnsafe(first_idx));\r
-\r
+ uchar * orig_text = current_text;\r
size_t read = 0;\r
\r
while (n <= fin){\r
tag = Tag(n);\r
};\r
_dputc('\n', fd);\r
+ if (orig_text && text_index_type != (TextCollectionBuilder::index_type_default))\r
+ Text->DeleteText(orig_text);\r
//_flush(fd);\r
}\r