From 2581056c23b28df723963023584f148b21e180f1 Mon Sep 17 00:00:00 2001 From: juha Date: Sun, 12 Sep 2010 11:16:05 +0000 Subject: [PATCH] Converter: Improve single unit file conversion. Load and save it properly. git-svn-id: trunk@27329 - --- converter/convertdelphi.pas | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/converter/convertdelphi.pas b/converter/convertdelphi.pas index 83e1a5ecee..1419c5aeb9 100644 --- a/converter/convertdelphi.pas +++ b/converter/convertdelphi.pas @@ -444,8 +444,16 @@ begin Result:=CopyAndLoadFile; if Result=mrOK then begin Result:=ConvertUnitFile; - if Result=mrOk then - Result:=ConvertFormFile; + if Result=mrOk then begin + Result:=SaveCodeBufferToFile(fPascalBuffer,fLazUnitFilename); + if Result=mrOk then begin + Result:=LazarusIDE.DoOpenEditorFile(fLazUnitFilename,0, + [ofOnlyIfExists,ofQuiet]); + if Result=mrOk then begin + Result:=ConvertFormFile; + end; + end; + end; end; end; if Result=mrOk then