From b106ded0e92cf4c32c0e8466b067de040443a517 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 3 Jan 2014 10:59:25 +0000
Subject: [PATCH]   * use SystemFileName instead of the original FileName in
 DeleteFile()

git-svn-id: trunk@26365 -
---
 rtl/os2/sysutils.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/os2/sysutils.pp b/rtl/os2/sysutils.pp
index 58b727fb02..20bb39b516 100644
--- a/rtl/os2/sysutils.pp
+++ b/rtl/os2/sysutils.pp
@@ -367,7 +367,7 @@ var
   SystemFileName: RawByteString;
 Begin
   SystemFileName:=ToSingleByteFileSystemEncodedFileName(Filename);
-  Result:=(DosDelete(PChar (FileName))=0);
+  Result:=(DosDelete(PChar (SystemFileName))=0);
 End;
 
 function RenameFile (const OldName, NewName: RawByteString): boolean;