paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 23:09:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazUtils: disable the wrapper functions in FileUtil by default. The wrapper functions will be removed later on.

Browse Source 
git-svn-id: trunk@51834 -
This commit is contained in:
bart 2016-03-06 13:19:23 +00:00
parent 0520897120
commit 9c050f164e
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazutils/fileutil.inc
View File

@ -11,7 +11,7 @@
***************************************************************************** *****************************************************************************
} }
{$IFnDEF DisableWrapperFunctions} {$IFDEF EnableWrapperFunctions}
function NeedRTLAnsi: boolean; function NeedRTLAnsi: boolean;
begin begin
Result := LazUtf8.NeedRTLAnsi; Result := LazUtf8.NeedRTLAnsi;
@ -340,7 +340,7 @@ begin
end; end;
{$ENDIF} {$ENDIF}
{$ENDIF DisableWrapperFunctions} {$ENDIF EnableWrapperFunctions}
// ToDo: For ExpandUNCFileNameUTF8 // ToDo: For ExpandUNCFileNameUTF8
// //

4
components/lazutils/fileutil.pas
View File

@ -54,7 +54,7 @@ const
// AnsiToUTF8 and UTF8ToAnsi need a widestring manager under Linux, BSD, MacOSX // AnsiToUTF8 and UTF8ToAnsi need a widestring manager under Linux, BSD, MacOSX
// but normally these OS use UTF-8 as system encoding so the widestringmanager // but normally these OS use UTF-8 as system encoding so the widestringmanager
// is not needed. // is not needed.
{$IFnDEF DisableWrapperFunctions} {$IFDEF EnableWrapperFunctions}
// *** Wrappers for LazUTF8 *** // *** Wrappers for LazUTF8 ***
function NeedRTLAnsi: boolean; inline; deprecated 'Use the function in LazUTF8 unit'; function NeedRTLAnsi: boolean; inline; deprecated 'Use the function in LazUTF8 unit';
procedure SetNeedRTLAnsi(NewValue: boolean); inline; deprecated 'Use the function in LazUTF8 unit'; procedure SetNeedRTLAnsi(NewValue: boolean); inline; deprecated 'Use the function in LazUTF8 unit';
@ -133,7 +133,7 @@ function CreateRelativePath(const Filename, BaseDirectory: string;
function GetDarwinSystemFilename(Filename: string): string; inline; function GetDarwinSystemFilename(Filename: string): string; inline;
{$ENDIF} {$ENDIF}
{$ENDIF DisableWrapperFunctions} {$ENDIF EnableWrapperFunctions}
// file and directory operations // file and directory operations
function ComparePhysicalFilenames(const Filename1, Filename2: string): integer; function ComparePhysicalFilenames(const Filename1, Filename2: string): integer;