diff --git a/installer/installer/AMXInstaller.exe b/installer/installer/AMXInstaller.exe index c915463b..ba4fe21d 100755 Binary files a/installer/installer/AMXInstaller.exe and b/installer/installer/AMXInstaller.exe differ diff --git a/installer/installer/UnitFunctions.pas b/installer/installer/UnitFunctions.pas index e803fb47..263f56d7 100755 --- a/installer/installer/UnitFunctions.pas +++ b/installer/installer/UnitFunctions.pas @@ -96,7 +96,11 @@ var eList: TStringList; i: integer; begin eList := TStringList.Create; - frmMain.IdFTP.List(eList); + try + frmMain.IdFTP.List(eList); + except + // nothing, not an exception?! + end; frmMain.IdFTP.DirectoryListing.LoadList(eList); eList.Clear; for i := 0 to frmMain.IdFTP.DirectoryListing.Count -1 do begin @@ -113,7 +117,11 @@ var eList: TStringList; i, eStart: integer; begin eList := TStringList.Create; - frmMain.IdFTP.List(eList, '', True); + try + frmMain.IdFTP.List(eList, '', True); + except + // nothing + end; eStart := 0; diff --git a/installer/installer/UnitfrmMain.pas b/installer/installer/UnitfrmMain.pas index 7fdfedc8..32e7ff65 100755 --- a/installer/installer/UnitfrmMain.pas +++ b/installer/installer/UnitfrmMain.pas @@ -209,8 +209,14 @@ begin ePath := '/' + CurNode.Text + ePath; CurNode := CurNode.Parent; until (not Assigned(CurNode)); - IdFTP.ChangeDir(ePath); - IdFTP.List(eStr, '', False); + IdFTP.ChangeDir(ePath); + + try + IdFTP.List(eStr, '', False); + except + // worst "exception" ever. bad indy! + end; + if eStr.IndexOf('liblist.gam') = -1 then begin MessageBox(Handle, 'Invalid directory. Please select your mod directory and try again.', PChar(Application.Title), MB_ICONWARNING); eStr.Free;