mirror of
https://github.com/rejetto/hfs2.git
synced 2025-12-19 10:03:56 +01:00
fix: (recent) error trying to load a VFS with an empty recent-files list
This commit is contained in:
parent
33d4d16b0b
commit
1fc5894204
@ -746,6 +746,8 @@ function removeString(s:string; var a:TStringDynArray; onlyOnce:boolean=TRUE; ci
|
||||
var i, lessen:integer;
|
||||
begin
|
||||
result:=FALSE;
|
||||
if a = NIL then
|
||||
exit;
|
||||
lessen:=0;
|
||||
try
|
||||
for i:=length(a)-1 to 0 do
|
||||
|
||||
Loading…
Reference in New Issue
Block a user