paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 01:59:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed typo

Browse Source 
git-svn-id: trunk@11929 -
This commit is contained in:
marco 2008-10-18 18:29:32 +00:00
parent 87eaa3c12b
commit 0518f65f63
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/fpdebug.pas
View File

@ -543,7 +543,7 @@ begin
{$endif Windows} {$endif Windows}
st[i]:='/'; st[i]:='/';
{$ifdef Windows} {$ifdef Windows}
{$ifdef USE_MINGW_GDB} // see mantis 11968 because of mingw build. MvdV {$ifndef USE_MINGW_GDB} // see mantis 11968 because of mingw build. MvdV
{ for Windows we should convert e:\ into //e/ PM } { for Windows we should convert e:\ into //e/ PM }
if (length(st)>2) and (st[2]=':') and (st[3]='/') then if (length(st)>2) and (st[2]=':') and (st[3]='/') then
st:=CygDrivePrefix+'/'+st[1]+copy(st,3,length(st)); st:=CygDrivePrefix+'/'+st[1]+copy(st,3,length(st));