Win32OperatingSystem.st
changeset 15039 aad511684e79
parent 14889 eaddf47af679
child 15076 f4c814ed8258
--- a/Win32OperatingSystem.st	Wed Apr 03 12:32:28 2013 +0200
+++ b/Win32OperatingSystem.st	Wed Apr 03 13:46:25 2013 +0200
@@ -5494,6 +5494,12 @@
 
 err:;
 %}.
+    aPathName isString ifTrue:[
+	aPathName isUnicode32String ifTrue:[
+	    "/ WIN32 only support 16 bit (wide) strings
+	    ^ self isValidPath:aPathName asUnicode16String
+	]
+    ].
     ^ self primitiveFailed
 
     "Modified: / 05-07-2006 / 17:23:51 / cg"
@@ -16521,11 +16527,11 @@
 !Win32OperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.457 2013-03-15 18:56:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.458 2013-04-03 11:46:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.457 2013-03-15 18:56:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Win32OperatingSystem.st,v 1.458 2013-04-03 11:46:25 cg Exp $'
 !
 
 version_SVN