mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: MultiArc - file list doubles at refresh

Browse source
This commit is contained in:
Alexander Koblov 2021-05-27 15:25:32 +03:00
commit 378389196a
1 changed files with 3 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/filesources/multiarchive/umultiarchivedynamicparser.pas
View file

@ -3,7 +3,7 @@
-------------------------------------------------------------------------
Multi archive dynamic parser
Copyright (C) 2016 Alexander Koblov (alexx2000@mail.ru)
Copyright (C) 2016-2021 Alexander Koblov (alexx2000@mail.ru)
Based on TFTPList (http://www.ararat.cz/synapse)
Copyright (C) 1999-2011, Lukas Gebauer
@ -77,7 +77,6 @@ type
constructor Create(AMultiArcItem: TMultiArcItem); override;
destructor Destroy; override;
procedure Clear; virtual;
procedure Prepare; override;
procedure ParseLines; override;
procedure AddLine(const Str: String); override;
@ -106,23 +105,18 @@ end;
destructor TMultiArchiveDynamicParser.Destroy;
begin
Clear;
Prepare;
FLines.Free;
FUnparsedLines.Free;
inherited Destroy;
end;
procedure TMultiArchiveDynamicParser.Clear;
procedure TMultiArchiveDynamicParser.Prepare;
begin
FLines.Clear;
FUnparsedLines.Clear;
end;
procedure TMultiArchiveDynamicParser.Prepare;
begin
end;
procedure TMultiArchiveDynamicParser.ClearStore;
begin
BlockSize := '';