UnixOperatingSystem.st
changeset 15072 da8a6e7c9d5c
parent 14899 81d128d5fb7d
child 15129 2a0db5d6749f
child 18045 c0c600e0d3b3
--- a/UnixOperatingSystem.st	Thu Apr 04 16:16:21 2013 +0200
+++ b/UnixOperatingSystem.st	Thu Apr 04 20:13:09 2013 +0200
@@ -4775,18 +4775,18 @@
 
     if (__isStringLike(encodedPathName)) {
 # ifdef TRACE_STAT_CALLS
-	printf("stat on '%s' for isValidPath\n", __stringVal(encodedPathName));
-# endif
-	__BEGIN_INTERRUPTABLE__
-	do {
-	    ret = stat((char *) __stringVal(encodedPathName), &buf);
-	} while ((ret < 0) && (errno == EINTR));
-	__END_INTERRUPTABLE__
-	if (ret < 0) {
-	    @global(LastErrorNumber) = __mkSmallInteger(errno);
-	    RETURN (false);
-	}
-	RETURN ( ret ? false : true );
+        printf("stat on '%s' for isValidPath\n", __stringVal(encodedPathName));
+# endif
+        __BEGIN_INTERRUPTABLE__
+        do {
+            ret = stat((char *) __stringVal(encodedPathName), &buf);
+        } while ((ret < 0) && (errno == EINTR));
+        __END_INTERRUPTABLE__
+        if (ret < 0) {
+            @global(LastErrorNumber) = __mkSmallInteger(errno);
+            RETURN (false);
+        }
+        RETURN ( ret ? false : true );
     }
 %}.
     ^ self primitiveFailed
@@ -8608,7 +8608,7 @@
     (pathName notNil and:[Codeset == #utf8]) ifTrue:[
         ^ pathName utf8Encoded.
     ].
-    ^ pathName
+    ^ pathName asSingleByteString.
 ! !
 
 !UnixOperatingSystem class methodsFor:'private'!
@@ -13488,11 +13488,11 @@
 !UnixOperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.307 2013-03-19 12:59:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.308 2013-04-04 18:13:09 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.307 2013-03-19 12:59:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.308 2013-04-04 18:13:09 stefan Exp $'
 ! !