mirror of
https://github.com/gnustep/libs-base.git
synced 2025-04-22 16:33:29 +00:00
Honor -Up flag better.
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@14474 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
parent
ef2457a2f9
commit
8b72e1dcc2
2 changed files with 15 additions and 0 deletions
|
@ -2,6 +2,9 @@
|
|||
|
||||
* Tools/AGSParser.m: Bugfix ... look for source files more
|
||||
intelligently. Try both current directory and relative to header.
|
||||
* Tools/AGSOutput.m: When creating template output file for functions
|
||||
etc because none was supplied, take account of the -Up flag and
|
||||
create an up link in it.
|
||||
* Source/GSHTTPURLHandle.m: If response parsing fails, fail the
|
||||
load operation and (conditionally when debug enabled) log an error.
|
||||
|
||||
|
|
|
@ -2031,6 +2031,8 @@ static BOOL snuggleStart(NSString *t)
|
|||
}
|
||||
else
|
||||
{
|
||||
NSString *up = [ud stringForKey: @"Up"];
|
||||
|
||||
/*
|
||||
* No pre-existing file, and no blank template available ...
|
||||
* Generate a standard template.
|
||||
|
@ -2043,6 +2045,16 @@ static BOOL snuggleStart(NSString *t)
|
|||
[str appendString: @"\"http://www.gnustep.org/gsdoc-0_6_7.xml\">\n"];
|
||||
[str appendString: @"<gsdoc base=\""];
|
||||
[str appendString: [name lastPathComponent]];
|
||||
/*
|
||||
* If a -Up default has been set, create an up link in this
|
||||
* template file... as long as the specified up link is not
|
||||
* the template file itsself.
|
||||
*/
|
||||
if (up != nil && [up isEqual: [name lastPathComponent]] == NO)
|
||||
{
|
||||
[str appendString: @"\" up=\""];
|
||||
[str appendString: up];
|
||||
}
|
||||
[str appendString: @"\">\n"];
|
||||
[str appendString: @" <head>\n"];
|
||||
[str appendString: @" <title>"];
|
||||
|
|
Loading…
Reference in a new issue