--- a/UninterpretedBytes.st	Thu Sep 17 16:59:35 2009 +0200
+++ b/UninterpretedBytes.st	Fri Sep 18 12:23:09 2009 +0200
@@ -127,7 +127,7 @@
 
     sz := aString size.
     sz == 0 ifTrue:[^ self new].
-    sz odd ifTrue:[self error:'invalid hex string (odd size)'.].
+    sz odd ifTrue:[ ConversionError raiseErrorString:'invalid hex string (odd size)' ].
 
     bytes := self new:(sz // 2).
     s := aString readStream.
@@ -2492,5 +2492,5 @@
 !UninterpretedBytes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.71 2009-08-23 09:43:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.72 2009-09-18 10:23:09 sr Exp $'
 ! !