diff options
Diffstat (limited to 'vfs')
| -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]) |