From 825bcfd2f503b0a8f984e2d58ff3255422fb47bd Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Sat, 24 Dec 2016 07:42:47 +0100
Subject: [PATCH] mini explorer, folders not always sorted

---
 src/ce_miniexplorer.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/ce_miniexplorer.pas b/src/ce_miniexplorer.pas
index 4458edf0..db701bfd 100644
--- a/src/ce_miniexplorer.pas
+++ b/src/ce_miniexplorer.pas
@@ -614,6 +614,7 @@ begin
   lst := TStringList.Create;
   try
     listFolders(lst, PString(aRoot.Data)^ + directorySeparator);
+    lst.Sort;
     for fold in lst do
     begin
       itm := Tree.Items.AddChild(aRoot, fold.extractFileName);