diff --git a/.gitignore b/.gitignore index 841a4c6..a22712a 100644 --- a/.gitignore +++ b/.gitignore @@ -1,2 +1,4 @@ lib /.project +backup +doc-devel diff --git a/README.md b/README.md index 8fdf2aa..b36d191 100644 --- a/README.md +++ b/README.md @@ -51,3 +51,10 @@ Does it work yet? ----------------- 95%. Should work for most simple projects out of the box and with a few tweaks to the templates for all others too. + +NB by Thierry Andriamirado: +--------------------------- +I concocted and delivered this maintenance version for practical reasons, +so that LazPackager continues to work as Lazarus evolves, and why not, to make +it evolve. Thanks go to Bernd Kreuss for this useful project. + diff --git a/lazpackager.lpk b/lazpackager.lpk index 971fa2e..4b2746a 100644 --- a/lazpackager.lpk +++ b/lazpackager.lpk @@ -1,19 +1,14 @@ - + + - - - - - - - + - + @@ -58,7 +53,6 @@ writing to the Free Software Foundation, Inc., 59 Temple Place - Suite - diff --git a/lazpackagerbase.pas b/lazpackagerbase.pas index 0e4ef96..3a46993 100644 --- a/lazpackagerbase.pas +++ b/lazpackagerbase.pas @@ -87,7 +87,7 @@ implementation sysutils, Forms, LCLProc, - FileUtil, + FileUtil, LazStringUtils, LazFileUtils, LazIDEIntf, ProjectResourcesIntf, MacroIntf, @@ -266,10 +266,11 @@ procedure TPackagerBase.RunBuildScript(Data: PtrInt); Tool: TIDEExternalToolOptions; begin Tool := TIDEExternalToolOptions.Create; - Tool.Filename := GetBuildScriptInterpreter; +// Tool.Filename := GetBuildScriptInterpreter; // Filename: deprecated + Tool.Executable := GetBuildScriptInterpreter; Tool.CmdLineParams := GetBuildScriptName; Tool.WorkingDirectory := GetProjectPathAbsolute; - Tool.ShowAllOutput := True; +// Tool.ShowAllOutput := True; // ShowAllOutput: "Error: ID no member" RunExternalTool(Tool); Tool.Free; Self.Free;