--- a/MappedPalette.st	Fri Feb 03 21:41:21 2017 +0100
+++ b/MappedPalette.st	Fri Feb 03 21:41:34 2017 +0100
@@ -9,10 +9,9 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
+"{ Package: 'stx:libview' }"
 
-
-"{ Package: 'stx:libview' }"
+"{ NameSpace: Smalltalk }"
 
 ColorPalette subclass:#MappedPalette
 	instanceVariableNames:''
@@ -80,8 +79,17 @@
     "Modified: 14.2.1997 / 17:43:31 / cg"
 ! !
 
+!MappedPalette methodsFor:'testing'!
+
+isMappedPalette
+    ^ true
+
+    "Created: / 03-02-2017 / 21:41:06 / cg"
+! !
+
 !MappedPalette class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/MappedPalette.st,v 1.5 2003-05-06 18:26:22 cg Exp $'
+    ^ '$Header$'
 ! !
+