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

fix #376 - arrow back in explorer has no effect when term follows the explorer curr dir

This commit is contained in:
Basile Burg 2018-11-02 04:45:38 +01:00
parent b322bed360
commit 3ddc0b5928
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ce_miniexplorer.lfm
View File

@ -180,11 +180,11 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
Top = 2 Top = 2
Width = 329 Width = 329
ButtonWidth = 23 ButtonWidth = 23
NumGlyphs = 1
Flat = True Flat = True
Align = alClient Align = alClient
BorderSpacing.Left = 180 BorderSpacing.Left = 180
BorderSpacing.Around = 2 BorderSpacing.Around = 2
NumGlyphs = 1
MaxLength = 0 MaxLength = 0
TabOrder = 0 TabOrder = 0
OnButtonClick = lstFilterButtonClick OnButtonClick = lstFilterButtonClick

3
src/ce_miniexplorer.pas
View File

@ -704,7 +704,10 @@ var
begin begin
p := treeFolders.Root.extractFileDir; p := treeFolders.Root.extractFileDir;
if p.dirExists then if p.dirExists then
begin
treeFolders.Root := p; treeFolders.Root := p;
subjMnexDirectoryChanged(fMnxSubj, p);
end;
end; end;
procedure TCEMiniExplorerWidget.lstFilesDblClick(Sender: TObject); procedure TCEMiniExplorerWidget.lstFilesDblClick(Sender: TObject);