--- a/CharacterArray.st	Fri Feb 21 16:02:13 2020 +0100
+++ b/CharacterArray.st	Fri Feb 21 23:02:51 2020 +0100
@@ -417,7 +417,6 @@
     "Modified: / 16-01-2018 / 18:59:04 / stefan"
 ! !
 
-
 !CharacterArray class methodsFor:'cleanup'!
 
 lowSpaceCleanup
@@ -680,7 +679,6 @@
     "
 ! !
 
-
 !CharacterArray class methodsFor:'pattern matching'!
 
 matchEscapeCharacter
@@ -1088,7 +1086,6 @@
     ^ Unicode32String
 ! !
 
-
 !CharacterArray class methodsFor:'utilities'!
 
 through:aCharacter in:inStream 
@@ -5674,8 +5671,6 @@
 ! !
 
 
-
-
 !CharacterArray methodsFor:'matching - glob expressions'!
 
 compoundMatch:aString
@@ -5772,9 +5767,10 @@
 
     matchers := self asCollectionOfSubstringsSeparatedBy:$;.
     withoutSeparators ifTrue:[ matchers := matchers collect:[:each | each withoutSeparators] ].
+
     ^ matchers
-        contains:[:aPattern |
-            aPattern match:aString caseSensitive:caseSensitive escapeCharacter:nil
+        contains:[:somePattern |
+            somePattern match:aString caseSensitive:caseSensitive escapeCharacter:nil
         ].
 
     "
@@ -5787,6 +5783,8 @@
      'f*;b*' compoundMatch:'Foo' caseSensitive:false
      'f*;b*' compoundMatch:'Bar' caseSensitive:false
      'f*;b*' compoundMatch:'ccc' caseSensitive:false
+     'f*;x*;bla.c' compoundMatch:'bla' caseSensitive:false  
+     'f*;x*;bla.c' compoundMatch:'bla.c' caseSensitive:false  
 
      'f* ; b*' compoundMatch:'foo'
      'f* ; b*' compoundMatch:'foo' caseSensitive:true withoutSeparators:true
@@ -7825,7 +7823,6 @@
     "Modified: 17.4.1997 / 12:50:23 / cg"
 ! !
 
-
 !CharacterArray methodsFor:'special string converting'!
 
 asUnixFilenameString
@@ -9791,7 +9788,6 @@
     "Modified (comment): / 12-12-2019 / 14:15:09 / Stefan Vogel"
 ! !
 
-
 !CharacterArray methodsFor:'substring searching'!
 
 findRangeOfString:subString
@@ -10379,7 +10375,6 @@
     ^ aVisitor visitString:self with:aParameter
 ! !
 
-
 !CharacterArray class methodsFor:'documentation'!
 
 version