paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-22 11:49:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Do not write descr nodes for module when updating

Browse Source
This commit is contained in:
michael 2004-08-28 18:18:59 +00:00
parent ad65b1d01e
commit 4a2124889f
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
utils/fpdoc/makeskel.pp
View File

@ -97,9 +97,12 @@ begin
WriteLn(f, '-->'); WriteLn(f, '-->');
WriteLn(f); WriteLn(f);
WriteLn(f, '<module name="', Result.Name, '">'); WriteLn(f, '<module name="', Result.Name, '">');
WriteLn(f, '<short></short>'); if not UpdateMode then
WriteLn(f, '<descr>'); begin
WriteLn(f, '</descr>'); WriteLn(f, '<short></short>');
WriteLn(f, '<descr>');
WriteLn(f, '</descr>');
end;
end end
else if WriteThisNode(Result) then else if WriteThisNode(Result) then
begin begin
@ -325,7 +328,10 @@ end.
{ {
$Log$ $Log$
Revision 1.10 2004-08-28 18:15:14 michael Revision 1.11 2004-08-28 18:18:59 michael
+ Do not write descr nodes for module when updating
Revision 1.10 2004/08/28 18:15:14 michael
+ Check whether outputfile not in inputfilenames + Check whether outputfile not in inputfilenames
Revision 1.9 2004/08/28 18:04:06 michael Revision 1.9 2004/08/28 18:04:06 michael