forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix av

This commit is contained in:
Basile Burg 2015-09-20 05:56:48 +02:00
parent 0d9be0dd80
commit 81c966b451
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ce_miniexplorer.pas
View File

@ -444,6 +444,8 @@ begin
{$ENDIF} {$ENDIF}
for i := 0 to aRoot.Count-1 do for i := 0 to aRoot.Count-1 do
begin begin
if aRoot.Items[i].Data = nil then
continue;
str := PString(aRoot.Items[i].Data)^; str := PString(aRoot.Items[i].Data)^;
if SameText(LeftStr(aPath, length(str)), str) then if SameText(LeftStr(aPath, length(str)), str) then
begin begin