рефакторинг для исключения лишней конвертации в массив

epf/xddTestRunner/xddTestRunner/Ext/ObjectModule.bsl

@@ -887,24 +887,29 @@
 
 	Перем СтрокаГдеИщем;
 
-	Если ТипЗнч(КоллекцияДляПоиска) = Тип("СписокЗначений") Тогда
+	ТипКоллекции = ТипЗнч(КоллекцияДляПоиска);
+	Если ТипКоллекции = Тип("СписокЗначений") Тогда
 		Если КоллекцияДляПоиска.НайтиПоЗначению(ЧтоИщем) <> Неопределено Тогда
 			Возврат Истина;
 		КонецЕсли;
 
-		Массив = Новый Массив;
 		Для Каждого ЭлементСписка Из КоллекцияДляПоиска Цикл
-			Массив.Добавить(ЭлементСписка.Значение);
+			Если СтрокаСоответствуетШаблону(ЧтоИщем, ЭлементСписка.Значение) Тогда
+				Возврат Истина;
+			КонецЕсли;
 		КонецЦикла;
-		КоллекцияДляПоиска = Массив;
+
+	ИначеЕсли ТипКоллекции = Тип("Массив") Тогда
+		Для Каждого СтрокаГдеИщем Из КоллекцияДляПоиска Цикл
+			Если СтрокаСоответствуетШаблону(ЧтоИщем, СтрокаГдеИщем) Тогда
+				Возврат Истина;
+			КонецЕсли;
+		КонецЦикла;
+
+	Иначе
+		ВызватьИсключение "Неверный тип параметра КоллекцияДляПоиска. Нужен Массив или СписокЗначений, а получили " + ТипКоллекции;
 	КонецЕсли;
 
-	Для Каждого СтрокаГдеИщем Из КоллекцияДляПоиска Цикл
-		Если СтрокаСоответствуетШаблону(ЧтоИщем, СтрокаГдеИщем) Тогда
-			Возврат Истина;
-		КонецЕсли;
-	КонецЦикла;
-
 	Возврат Ложь;
 
 КонецФункции