--- oup/current/Helper_LevelDB.pas	2006/12/18 23:35:30	43
+++ oup/current/Helper_LevelDB.pas	2006/12/23 16:26:43	46
@@ -30,8 +30,8 @@ implementation
 
 {$R *.dfm}
 
-uses ABSMain, ABSDecUtil, Main, Code_Functions, Data,
-  Code_OniImgClass, Code_DataStructures, Code_OniDataClass;
+uses ABSMain, ABSDecUtil, Main, Functions, Data,
+  OniImgClass, DataStructures, OniDataClass;
 
 type
   THandler = procedure(fileid: LongWord; dir_dat2db: Boolean);
@@ -160,7 +160,7 @@ begin
     for j := 0 to 3 do
       temps[j + 1] := ExtensionsHeader[i].Extension[3 - j];
     ExtensionsHeader[i].ExtCount :=
-      Length(OniDataConnection.GetFilesList(temps, '', False));
+      Length(OniDataConnection.GetFilesList(temps, '', False, stIDAsc));
     progress.Position    := i + 1;
     lbl_progress.Caption := 'Extensions done: ' + IntToStr(i + 1) + '/' +
       IntToStr(Length(extlist));