Added note in generated units that files are autogenerated from gobject introspection

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1996 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
drewski207 2011-09-24 01:22:48 +00:00
parent 7a5ced7b31
commit 3e3c9f5cc3

View File

@ -1854,6 +1854,7 @@ begin
Libs.CommaText:=NameSpace.SharedLibrary;
Result := TStringStream.Create('');
Str.WriteString(IndentText('{ This is an autogenerated unit using gobject intorspection. Do not Edit. }',0,2));
Str.WriteString(IndentText('unit '+ UnitName+';',0,2));
Str.WriteString(IndentText('{$MODE OBJFPC}{$H+}',0,2));
Str.WriteString(IndentText('{$PACKRECORDS C}',0,1));