diff options
| author | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2008-08-23 22:54:42 +0200 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2008-08-23 22:54:42 +0200 |
| commit | ef3e79e0bb6ba4a5e5d4dc1467281370e1d8b488 (patch) | |
| tree | 0f492cbf72e3cbc1954d6187e9d539bd0525e951 /vfs/UVFSCore.pas | |
| parent | 182fe0717f8e7fefd1e5c1eb42968fd29e15156f (diff) | |
| download | tuxcmd-ef3e79e0bb6ba4a5e5d4dc1467281370e1d8b488.tar.xz | |
Fix some compiler warnings
Diffstat (limited to 'vfs/UVFSCore.pas')
| -rw-r--r-- | vfs/UVFSCore.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/vfs/UVFSCore.pas b/vfs/UVFSCore.pas index eafc2ef..4dd00b1 100644 --- a/vfs/UVFSCore.pas +++ b/vfs/UVFSCore.pas @@ -845,6 +845,7 @@ end; function TVFSEngine.CopyFileOut(Sender: Pointer; SourceFile, DestFile: string; ProgressFunc: TEngineProgressFunc; ErrorFunc: TEngineErrorFunc; Append: boolean): boolean; var Res: TVFSResult; begin + Result := False; try if @FSourcePlugin.FVFSCopyOut <> nil then begin FSenderThread := Sender; @@ -877,6 +878,7 @@ end; function TVFSEngine.CopyFileIn(Sender: Pointer; SourceFile, DestFile: string; ProgressFunc: TEngineProgressFunc; ErrorFunc: TEngineErrorFunc; Append: boolean): boolean; var Res: TVFSResult; begin + Result := False; try if @FSourcePlugin.FVFSCopyIn <> nil then begin FSenderThread := Sender; @@ -1012,7 +1014,6 @@ begin Break; end; - ModuleHandler := nil; if b then DebugMsg(['Module ', s, ' is already loaded --> skipping...']) else begin ModuleHandler := dlopen(PChar(IncludeTrailingPathDelimiter(s) + Buf), RTLD_LAZY); if ModuleHandler = nil then DebugMsg([' XXX Error loading module: ', dlerror]) |