diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-07 08:00:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-07 08:00:29 (GMT) |
| commit | 65baf6c706d7cfa12cfbc06610f7e9a51c5c81e8 (patch) | |
| tree | fab6b64cc01473472c271a5323ce0b8ce84ecfd4 /win/tclWinFile.c | |
| parent | fa0f595cf9f339ac2922ffea021e3763df775cb8 (diff) | |
| download | tcl-65baf6c706d7cfa12cfbc06610f7e9a51c5c81e8.zip tcl-65baf6c706d7cfa12cfbc06610f7e9a51c5c81e8.tar.gz tcl-65baf6c706d7cfa12cfbc06610f7e9a51c5c81e8.tar.bz2 | |
Fix some gcc/MSVC (harmless) compiler warnings. Remove some unnecessary end-of-line spacing
Diffstat (limited to 'win/tclWinFile.c')
| -rwxr-xr-x | win/tclWinFile.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index b9787c7..809bcf0 100755 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -1460,9 +1460,9 @@ TclpGetUserHome( domain = Tcl_UtfFindFirst(name, '@'); if (domain == NULL) { const char *ptr; - + /* no domain - firstly check it's the current user */ - if ( (ptr = TclpGetUserName(&ds)) != NULL + if ( (ptr = TclpGetUserName(&ds)) != NULL && strcasecmp(name, ptr) == 0 ) { /* try safest and fastest way to get current user home */ @@ -1485,7 +1485,7 @@ TclpGetUserHome( Tcl_DStringInit(&ds); wName = Tcl_UtfToUniCharDString(name, nameLen, &ds); while (NetUserGetInfo(wDomain, wName, 1, (LPBYTE *) &uiPtr) != 0) { - /* + /* * user does not exists - if domain was not specified, * try again using current domain. */ @@ -1600,7 +1600,7 @@ NativeAccess( return 0; } - /* + /* * If it's not a directory (assume file), do several fast checks: */ if (!(attr & FILE_ATTRIBUTE_DIRECTORY)) { @@ -2031,7 +2031,7 @@ NativeStat( */ fileHandle = CreateFile(nativePath, GENERIC_READ, - FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, + FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS | FILE_FLAG_OPEN_REPARSE_POINT, NULL); |