Portability fixes

1 files changed, 9 insertions, 9 deletions

diff --git a/USearch.pas b/USearch.pas
index 0156d59..2859de4 100644
--- a/USearch.pas
+++ b/USearch.pas
@@ -24,7 +24,7 @@ interface
 uses
   glib2, gdk2, gtk2, SyncObjs, SysUtils, Types, Classes, Variants, GTKControls, GTKForms, GTKStdCtrls, GTKExtCtrls, GTKConsts, GTKView,
   GTKMenus,
-  UEngines, UGnome;
+  UEngines, UGnome, ULibc;
 
 type
   TFSearch = class(TGTKDialog)
@@ -88,7 +88,7 @@ type
     FStartPath, FFileMask, FStringFind: string;
     FDontLeaveFS, FCaseSensitiveMask, FCaseSensitiveStrings, FSearchArchives: boolean;
     FBiggerThan, FSmallerThan: integer;   //  -1 = skip
-    FModifiedBetween1, FModifiedBetween2, FNotModifiedAfter: TDateTime;
+    FModifiedBetween1, FModifiedBetween2, FNotModifiedAfter: time_t;
     FModifiedLast, FModifiedNotLast: integer;
     FList: TList;
     procedure Execute; override;
@@ -104,7 +104,7 @@ var
 
 implementation
 
-uses Math, UMain, ULocale, UCoreUtils, ULibc, UCore, DateUtils, UViewer, UConfig, UVFSCore;
+uses Math, UMain, ULocale, UCoreUtils, UCore, DateUtils, UViewer, UConfig, UVFSCore;
 
 type TFileListItem = class
        CRC: LongWord;
@@ -700,16 +700,16 @@ begin
         i := i * Trunc(Power(1024, SmallerThanOptionMenu.ItemIndex));
         FSmallerThan := i;
       end;
-      FModifiedBetween1 := -1;
-      FModifiedBetween2 := -1;
-      FNotModifiedAfter := -1;
+      FModifiedBetween1 := 0;
+      FModifiedBetween2 := 0;
+      FNotModifiedAfter := 0;
       if not FUseGnomeWidgets then begin
         if ModifiedBetweenRadioButton.Checked then begin
-          FModifiedBetween1 := StrToDateDef(ModifiedBetweenEntry1.Text, -1);
-          FModifiedBetween2 := StrToDateDef(ModifiedBetweenEntry2.Text, -1);
+          FModifiedBetween1 := StrTotimetDef(ModifiedBetweenEntry1.Text, 0);
+          FModifiedBetween2 := StrTotimetDef(ModifiedBetweenEntry2.Text, 0);
         end;
         if NotModifiedAfterRadioButton.Checked then
-          FNotModifiedAfter := StrToDateDef(NotModifiedAfterEntry.Text, -1);
+          FNotModifiedAfter := StrTotimetDef(NotModifiedAfterEntry.Text, 0);
       end else begin
         if ModifiedBetweenRadioButton.Checked then begin
           FModifiedBetween1 := ModifiedBetweenEntry1G.Time;