summaryrefslogtreecommitdiff
path: root/UEngines.pas
diff options
context:
space:
mode:
authorTomas Bzatek <tbzatek@users.sourceforge.net>2008-06-15 11:42:49 +0200
committerTomas Bzatek <tbzatek@users.sourceforge.net>2008-06-15 11:42:49 +0200
commit25c58a81ca9202af54d28888d2b068ebeb2a376f (patch)
treeb0ad200b316f4dec392d1640bd6e3edea6be3606 /UEngines.pas
parentc9a02bf590248c0bd8e1343198d3f9c13ce118c1 (diff)
downloadtuxcmd-25c58a81ca9202af54d28888d2b068ebeb2a376f.tar.xz
Portability fixes
Diffstat (limited to 'UEngines.pas')
-rw-r--r--UEngines.pas4
1 files changed, 1 insertions, 3 deletions
diff --git a/UEngines.pas b/UEngines.pas
index 6cb8d7a..b4dc319 100644
--- a/UEngines.pas
+++ b/UEngines.pas
@@ -81,7 +81,6 @@ type
LastHighlightItem, SavePath: string;
constructor Create;
destructor Destroy; override;
-// function GetListing(var List: PGSList): integer; virtual; abstract; // Returns errorcode
function GetListing(var List: TList; const AddDotFiles: boolean): integer; overload; virtual; abstract; // Returns errorcode
function GetListing(var List: TList; const AddDotFiles: boolean; APath: string): integer; overload; virtual; abstract; // Returns errorcode
function ChangeDir(const NewPath: string; const ShowProgress: boolean = True): integer; virtual; abstract; // Returns errorcode
@@ -135,7 +134,6 @@ type
public
constructor Create;
destructor Destroy; override;
-// function GetListing(var List: PGSList): integer; override;
function GetListing(var List: TList; const AddDotFiles: boolean): integer; override;
function GetListing(var List: TList; const AddDotFiles: boolean; APath: string): integer; override;
function ChangeDir(const NewPath: string; const ShowProgress: boolean = True): integer; override;
@@ -728,9 +726,9 @@ var fsrc, fdest: PFILE;
BytesWritten: Int64;
Res: boolean;
begin
- try
Result := False;
Res := True;
+ try
// DebugMsg(['*** Using old copy function due to bug in sendfile']);
// WriteLn('x1');
Buffer := malloc(FBlockSize);