--- a/ResourcePack.st	Wed Sep 13 16:36:51 2006 +0200
+++ b/ResourcePack.st	Wed Sep 13 19:08:13 2006 +0200
@@ -636,7 +636,7 @@
                 ].
             ].
 
-            (':=.' includes:aKey last) ifTrue:[
+            (':=.?!!' includes:aKey last) ifTrue:[
                 rest := aKey last.
                 usedKey := aKey copyWithoutLast:1.
 
@@ -684,6 +684,8 @@
         ].
     ].
     ^ defaultValue value
+
+    "Modified: / 13-09-2006 / 19:08:11 / cg"
 !
 
 name:aKey default:default
@@ -1148,7 +1150,7 @@
 !ResourcePack class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.109 2006-07-05 15:25:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.110 2006-09-13 17:08:13 cg Exp $'
 ! !
 
 ResourcePack initialize!