--- 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