minor fix for mingw

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/branches/freeze-1_6_0@16054 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-Macdonald 2003-02-23 05:29:13 +00:00
parent d4a04c7c4d
commit b25c34f4e1
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2003-02-23 Richard Frith-Macdonald <rfm@gnu.org>
* Source/NSUser.m: Don't prepend HOMEDRIVE to HOMEPATH if HOMEPATH
already contains a drive letter.
2003-02-22 Richard Frith-Macdonald <rfm@gnu.org>
* Source/Additions/GSObjCRuntime.m: GSObjCSetValue() correct to call

View file

@ -280,7 +280,7 @@ NSHomeDirectoryForUser(NSString *loginName)
/* The environment variable HOMEPATH holds the home directory
for the user on Windows NT; Win95 has no concept of home. */
s = GSStringFromWin32EnvironmentVariable("HOMEPATH");
if (s != nil)
if (s != nil && ([s length] < 2 || [s characterAtIndex: 1] != ':'))
{
s = [GSStringFromWin32EnvironmentVariable("HOMEDRIVE")
stringByAppendingString: s];