* Adapted test to test for 27831

git-svn-id: trunk@30641 -

tests/test/units/strutils/tiswild.pp

@@ -125,6 +125,7 @@ begin
   isWildTest('en-GB.pak', '??*??.pak', CfollowCase, true,  117);
   isWildTest('am.pak', '??*??.pak', CignoreCase, false, 118);
   isWildTest('am.pak', '??*??.pak', CfollowCase, false, 119);
+  IsWildTest('this that','*that',cignorecase,true,120)  ;
   
   halt(exitCode);
 end.