--- a/ResourcePack.st	Fri Oct 26 21:16:28 2018 +0200
+++ b/ResourcePack.st	Sat Oct 27 11:11:07 2018 +0200
@@ -1049,7 +1049,7 @@
             val notNil ifTrue:[^ val, (aKey copyFrom:usedKey size + 1)].      "/ append the stripped separators
         ].
 
-        ('*:=.?!!,-><\' includes:last) ifTrue:[
+        (';*:=.?!!,-><\' includes:last) ifTrue:[
             aKey size >= 2 ifTrue:[
                 usedKey := aKey copyButLast:1.
 
@@ -1057,7 +1057,7 @@
                 val notNil ifTrue:[^ val copyWith:last].
             ].
         ].
-        ('*:=.?!!-><\' includes:first) ifTrue:[
+        (';*:=.?!!-><\' includes:first) ifTrue:[
             aKey size >= 2 ifTrue:[
                 usedKey := aKey copyButFirst:1.
 
@@ -1086,6 +1086,7 @@
     "Created: / 18-09-2006 / 17:33:27 / cg"
     "Modified: / 05-08-2010 / 16:52:32 / sr"
     "Modified: / 27-11-2017 / 15:33:48 / cg"
+    "Modified: / 27-10-2018 / 11:10:44 / Claus Gittinger"
 !
 
 name:aKey default:default