Przeglądaj źródła

Browsing file was broken by bbc80980 (Issue 1057)

Source commit: d07efcd3a2cd114b3fd668580ed7480eb88b4257
Martin Prikryl 1 rok temu
rodzic
commit
208622d877
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      source/packages/filemng/CustomDirView.pas

+ 1 - 1
source/packages/filemng/CustomDirView.pas

@@ -3509,7 +3509,7 @@ procedure TCustomDirView.FocusByName(FileName: string);
 var
 var
   ListItem: TListItem;
   ListItem: TListItem;
 begin
 begin
-  ListItem := FindFileItemIfNotEmpty(Name);
+  ListItem := FindFileItemIfNotEmpty(FileName);
   if Assigned(ListItem) then
   if Assigned(ListItem) then
   begin
   begin
     ItemFocused := ListItem;
     ItemFocused := ListItem;