# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1326974988 -3600
# Node ID 5c482fe46e20616aaa6d1ac1fa0eca0ea7136ceb
# Parent  efccef803a926d8f1b89676b1470a3818afcbebc
changed: #knownFeatures

diff -r efccef803a92 -r 5c482fe46e20 ConfigurableFeatures.st
--- a/ConfigurableFeatures.st	Thu Jan 19 10:18:11 2012 +0100
+++ b/ConfigurableFeatures.st	Thu Jan 19 13:09:48 2012 +0100
@@ -57,7 +57,9 @@
     ^ self class methodDictionary keys
         collect:[:each | 
             (each startsWith:'has') ifTrue:[
-                each copyFrom:4
+                (each endsWith:':') ifFalse:[
+                    each copyFrom:4
+                ]
             ] ifFalse:[
                 nil
             ].
@@ -212,9 +214,9 @@
 !ConfigurableFeatures class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.5 2012-01-18 10:00:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.6 2012-01-19 12:09:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.5 2012-01-18 10:00:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ConfigurableFeatures.st,v 1.6 2012-01-19 12:09:48 cg Exp $'
 ! !