mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
UPD: Prepare FPC 3.0 support
This commit is contained in:
parent
c67e68e0ab
commit
a441cd3201
1 changed files with 3 additions and 3 deletions
|
|
@ -228,13 +228,13 @@ implementation
|
|||
|
||||
uses
|
||||
StrUtils, uFileProcs, FileUtil, uDCUtils, DCOSUtils, DCStrUtils, uGlobs, uLng,
|
||||
fConfirmCommandLine, uLog
|
||||
fConfirmCommandLine, uLog, DCConvertEncoding
|
||||
{$IF DEFINED(MSWINDOWS)}
|
||||
, JwaWinCon, Windows, LazUTF8, uNTFSLinks, uMyWindows, JwaWinNetWk,
|
||||
uShlObjAdditional, shlobj
|
||||
{$ENDIF}
|
||||
{$IF DEFINED(UNIX)}
|
||||
, DCConvertEncoding, BaseUnix, Unix, uMyUnix, dl
|
||||
, BaseUnix, Unix, uMyUnix, dl
|
||||
{$IF NOT DEFINED(DARWIN)}
|
||||
, uGio, uClipboard
|
||||
{$ENDIF}
|
||||
|
|
@ -977,7 +977,7 @@ end;
|
|||
function mbFileNameToSysEnc(const LongPath: String): String;
|
||||
{$IFDEF MSWINDOWS}
|
||||
begin
|
||||
Result:= UTF8ToSys(LongPath);
|
||||
Result:= CeUtf8ToSys(LongPath);
|
||||
if Pos('?', Result) <> 0 then
|
||||
mbGetShortPathName(LongPath, Result);
|
||||
end;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue