MappedPalette.st
changeset 3865 18532e89cdca
parent 3848 84597432b833
child 3873 1f62ad46a04a
--- a/MappedPalette.st	Mon Apr 28 12:14:49 2003 +0200
+++ b/MappedPalette.st	Mon Apr 28 12:15:34 2003 +0200
@@ -12,7 +12,7 @@
 
 
 
-"{ Package: 'stx:libcompat' }"
+"{ Package: 'stx:libview' }"
 
 ColorPalette subclass:#MappedPalette
 	instanceVariableNames:''
@@ -56,7 +56,7 @@
 blackWhite
     "ST-80 compatibility"
 
-    ^ super fromColors:(Array with:(Color black) with:(Color white))
+    ^ self fromColors:(Array with:(Color black) with:(Color white))
 
     "Created: 7.10.1996 / 11:31:08 / cg"
     "Modified: 14.2.1997 / 17:43:24 / cg"
@@ -73,7 +73,7 @@
 whiteBlack
     "ST-80 compatibility"
 
-    ^ super fromColors:(Array with:(Color white) with:(Color black))
+    ^ self fromColors:(Array with:(Color white) with:(Color black))
 
     "Created: 7.10.1996 / 11:29:01 / cg"
     "Modified: 14.2.1997 / 17:43:31 / cg"
@@ -82,5 +82,5 @@
 !MappedPalette class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/MappedPalette.st,v 1.2 2003-04-10 14:48:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/MappedPalette.st,v 1.3 2003-04-28 10:15:34 cg Exp $'
 ! !