* use StartsStr() instead of a manual copy to check whether the line starts with the message id

tests/utils/dotest.pp

@@ -764,7 +764,7 @@ begin
         begin
           str(Msgs[i],id);
           id:='('+id+')';
-          if (copy(s,1,length(id))=id) or (pos(': '+id,s)>0) then
+          if startsstr(id,s) or (pos(': '+id,s)>0) then
             begin
               if not Found[i] then
                 inc(fnd);