--- a/CharacterEncoderImplementations__JIS0208.st Thu Oct 30 20:54:05 2008 +0100
+++ b/CharacterEncoderImplementations__JIS0208.st Thu Oct 30 20:54:58 2008 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libbasic' }"
"{ NameSpace: CharacterEncoderImplementations }"
@@ -7636,7 +7635,7 @@
unicode := unicodeArg.
unicode <= 16r5B ifTrue:[
- ^ self decodingError.
+ ^ self encodingError.
].
unicode > 16rFFE5 ifTrue:[
^ self encodingError.
@@ -28647,5 +28646,5 @@
!JIS0208 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__JIS0208.st,v 1.3 2004-03-09 22:00:56 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__JIS0208.st,v 1.4 2008-10-30 19:54:58 cg Exp $'
! !
--- a/Encoder_JIS0208.st Thu Oct 30 20:54:05 2008 +0100
+++ b/Encoder_JIS0208.st Thu Oct 30 20:54:58 2008 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libbasic' }"
"{ NameSpace: CharacterEncoderImplementations }"
@@ -7636,7 +7635,7 @@
unicode := unicodeArg.
unicode <= 16r5B ifTrue:[
- ^ self decodingError.
+ ^ self encodingError.
].
unicode > 16rFFE5 ifTrue:[
^ self encodingError.
@@ -28647,5 +28646,5 @@
!JIS0208 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_JIS0208.st,v 1.3 2004-03-09 22:00:56 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_JIS0208.st,v 1.4 2008-10-30 19:54:58 cg Exp $'
! !