gnustep/libs-base
0
0
Fork 0
mirror of https://github.com/gnustep/libs-base.git synced 2025-04-23 09:04:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

Minor fix

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@17285 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-Macdonald 2003-07-22 04:22:58 +00:00
parent 2006c0f018
commit 20e19b3270
2 changed files with 77 additions and 70 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ChangeLog
View file

@ -1,3 +1,7 @@
2003-07-22 Richard Frith-Macdonald <rfm@gnu.org>
* Tools/AGSHtml.m: Don't output authors heading if not needed.
2003-07-21 Richard Frith-Macdonald <rfm@gnu.org>
* Source/Additions/Unicode.m (GROW): Fix shifting of pointers into

143
Tools/AGSHtml.m
View file

@ -1012,86 +1012,89 @@ static NSMutableSet *textNodes = nil;
[self outputText: [children firstChild] to: buf];
[buf appendString: @"</a></h1>\n"];
[buf appendString: indent];
[buf appendString: @"<h3>Authors</h3>\n"];
[buf appendString: indent];
[buf appendString: @"<dl>\n"];
[self incIndent];
children = [children nextElement];
while ([[children name] isEqual: @"author"] == YES)
if ([[children name] isEqual: @"author"] == YES)
{
GSXMLNode *author = children;
GSXMLNode *tmp;
GSXMLNode *email = nil;
GSXMLNode *url = nil;
GSXMLNode *desc = nil;
children = [children nextElement];
tmp = [author firstChildElement];
if ([[tmp name] isEqual: @"email"] == YES)
{
email = tmp;
tmp = [tmp nextElement];
}
if ([[tmp name] isEqual: @"url"] == YES)
{
url = tmp;
tmp = [tmp nextElement];
}
if ([[tmp name] isEqual: @"desc"] == YES)
{
desc = tmp;
tmp = [tmp nextElement];
}
[buf appendString: indent];
if (url == nil)
{
[buf appendString: @"<dt>"];
[buf appendString: [[author attributes]
objectForKey: @"name"]];
}
else
{
[buf appendString: @"<dt><a href=\""];
[buf appendString: [[url attributes]
objectForKey: @"url"]];
[buf appendString: @"\">"];
[buf appendString: [[author attributes]
objectForKey: @"name"]];
[buf appendString: @"</a>"];
}
if (email != nil)
{
//
// Add a beautifier ' ' otherwise we'll get a
// <dt>John Doe(<a href="mailto:...
// or
// <dt><a href...>John Doe</a>(<a href...
//
[buf appendString: @" ("];
[self outputNode: email to: buf];
[buf appendString: @")"];
}
[buf appendString: @"</dt>\n"];
[buf appendString: @"<h3>Authors</h3>\n"];
[buf appendString: indent];
[buf appendString: @"<dd>\n"];
if (desc != nil)
[buf appendString: @"<dl>\n"];
[self incIndent];
while ([[children name] isEqual: @"author"] == YES)
{
[self incIndent];
while (desc != nil)
GSXMLNode *author = children;
GSXMLNode *tmp;
GSXMLNode *email = nil;
GSXMLNode *url = nil;
GSXMLNode *desc = nil;
children = [children nextElement];
tmp = [author firstChildElement];
if ([[tmp name] isEqual: @"email"] == YES)
{
desc = [self outputBlock: desc to: buf inPara: NO];
email = tmp;
tmp = [tmp nextElement];
}
[self decIndent];
if ([[tmp name] isEqual: @"url"] == YES)
{
url = tmp;
tmp = [tmp nextElement];
}
if ([[tmp name] isEqual: @"desc"] == YES)
{
desc = tmp;
tmp = [tmp nextElement];
}
[buf appendString: indent];
if (url == nil)
{
[buf appendString: @"<dt>"];
[buf appendString: [[author attributes]
objectForKey: @"name"]];
}
else
{
[buf appendString: @"<dt><a href=\""];
[buf appendString: [[url attributes]
objectForKey: @"url"]];
[buf appendString: @"\">"];
[buf appendString: [[author attributes]
objectForKey: @"name"]];
[buf appendString: @"</a>"];
}
if (email != nil)
{
//
// Add a beautifier ' ' otherwise we'll get a
// <dt>John Doe(<a href="mailto:...
// or
// <dt><a href...>John Doe</a>(<a href...
//
[buf appendString: @" ("];
[self outputNode: email to: buf];
[buf appendString: @")"];
}
[buf appendString: @"</dt>\n"];
[buf appendString: indent];
[buf appendString: @"<dd>\n"];
if (desc != nil)
{
[self incIndent];
while (desc != nil)
{
desc = [self outputBlock: desc to: buf inPara: NO];
}
[self decIndent];
}
[buf appendString: indent];
[buf appendString: @"</dd>\n"];
}
[self decIndent];
[buf appendString: indent];
[buf appendString: @"</dd>\n"];
[buf appendString: @"</dl>\n"];
}
[self decIndent];
[buf appendString: indent];
[buf appendString: @"</dl>\n"];
if ([[children name] isEqual: @"version"] == YES)
{
[buf appendString: indent];