fixed drag&drop bug

--HG--
extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%401309
This commit is contained in:
Christian Hammacher 2007-08-10 22:29:54 +00:00
parent c2e2c5bfda
commit 5d195c6560
2 changed files with 1 additions and 1 deletions

Binary file not shown.

View File

@ -86,7 +86,7 @@ begin
try
cStart := GetTickCount;
if not GetConsoleOutput(ExtractFilePath(ParamStr(0))+COMPILER_EXE+' "'+FileName+'" "-o'+Compiled+'"',Output) then
if not GetConsoleOutput(ExtractFilePath(ParamStr(0))+COMPILER_EXE+' "'+Name+'" "-o'+Compiled+'"',Output) then
begin
WriteLn('// Internal error.');
AppExit;