--- a/src/JavaVM.st Wed Aug 10 22:22:53 2011 +0000
+++ b/src/JavaVM.st Wed Aug 10 22:58:10 2011 +0000
@@ -3504,7 +3504,7 @@
('JAVA: opening ' , name) infoPrintCR.
].
- fn := name asFilename.
+ fn := name utf8Decoded asFilename.
dir := fn directory pathName.
readonly := false.
@@ -3540,7 +3540,7 @@
].
stream := fn readStream.
] ifFalse:[
- fn exists ifTrue:[
+ fn exists ifFalse:[
^self throwFileNotFoundException: 'File does not exist'
].
fn isDirectory ifTrue:[
@@ -3569,7 +3569,7 @@
"Created: / 07-04-1998 / 19:14:09 / cg"
"Modified: / 04-01-1999 / 14:34:42 / cg"
- "Modified: / 10-08-2011 / 21:45:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 10-08-2011 / 23:49:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
fileStreamForReading:name
@@ -3996,9 +3996,10 @@
<javanative: 'java/io/FileOutputStream' name: 'openAppend'>
- ^ self commonOpen:nativeContext forAppend:true
-
- "Modified: / 7.4.1998 / 19:13:42 / cg"
+ ^ self commonOpen:nativeContext forAppend:true
+
+ "Modified: / 07-04-1998 / 19:13:42 / cg"
+ "Modified (format): / 10-08-2011 / 23:48:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
_java_io_FileOutputStream_write: nativeContext
@@ -4204,11 +4205,10 @@
<javanative: 'java/io/UnixFileSystem' name: 'canonicalize0'>
-
| path |
path := Java as_ST_String: (aJavaContext argAt: 1).
- ^(Java as_String: path asFilename asAbsoluteFilename pathName)
+ ^(Java as_String: path utf8Encoded asFilename asAbsoluteFilename pathName utf8Decoded)
"Created: / 10-12-2010 / 14:40:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!