gnustep/libs-base
0
0
Fork 0
mirror of https://github.com/gnustep/libs-base.git synced 2025-04-26 10:11:03 +00:00
Code Issues Projects Releases Packages Wiki Activity

Pewrmit ~ at start of root paths

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@12944 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS 2002-03-01 16:51:00 +00:00
parent 6884ce6c69
commit b9b95d718d
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
Source/NSUser.m
View file

@ -506,10 +506,20 @@ userDirectory(NSString *name, BOOL defaults)
val = [val stringByTrimmingSpaces];
if ([key isEqualToString: @"GNUSTEP_USER_ROOT"] == YES)
{
if ([val length] > 0 && [val characterAtIndex: 0] == '~')
{
val = [home stringByAppendingString:
[val substringFromIndex: 1]];
}
user = val;
}
else if ([key isEqualToString: @"GNUSTEP_DEFAULTS_ROOT"] == YES)
{
if ([val length] > 0 && [val characterAtIndex: 0] == '~')
{
val = [home stringByAppendingString:
[val substringFromIndex: 1]];
}
defs = val;
}
}