--- a/XPMReader.st	Fri Mar 05 18:56:19 2004 +0100
+++ b/XPMReader.st	Fri Mar 05 20:04:29 2004 +0100
@@ -224,7 +224,7 @@
             key := s next:charsPerPixel.
             characterTranslation at:key put:colorIndex - 1.
         ] ifFalse:[
-            index := s next asciiValue.
+            index := s next codePoint.
             characterTranslation at:index put:colorIndex - 1.
         ].
 
@@ -447,7 +447,7 @@
             1 to:width do:[:col |
                 key := line at:srcIndex.
                 key ~~ lastKey ifTrue:[
-                    lastXLation := characterTranslation at:key asciiValue.
+                    lastXLation := characterTranslation at:key codePoint.
                     lastKey := key
                 ].
                 data at:dstIndex put:lastXLation.
@@ -634,7 +634,7 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.61 2004-02-12 23:25:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.62 2004-03-05 19:04:29 stefan Exp $'
 ! !
 
 XPMReader initialize!