Minor bugfix

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@11759 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS 2001-12-15 08:24:46 +00:00
parent d2daa88b21
commit 7066aa3a07

View file

@ -127,7 +127,7 @@
fileName = name; fileName = name;
if (declared == nil) if (declared == nil)
{ {
ASSIGN(declared, fileName); ASSIGN(declared, [fileName lastPathComponent]);
} }
unitName = nil; unitName = nil;
itemName = nil; itemName = nil;
@ -1117,6 +1117,11 @@ fail:
pos = 0; pos = 0;
} }
/**
* Set the name of the file in which classes are to be documented as
* being declared. The default value of this is the last part of the
* path of the source file being parsed.
*/
- (void) setDeclared: (NSString*)name - (void) setDeclared: (NSString*)name
{ {
ASSIGN(declared, name); ASSIGN(declared, name);