Merge pull request #24 from 1dimir/develop

Чуть более аккуратная работа с кавычками при разборе отчёта по хранилищу

Author: khorevaa

src/Классы/internal/ripper/Классы/ПарсерОтчетаХранилища.os

@@ -23,15 +23,17 @@
 
 Функция ПрочитатьТекстСкобкоФайлаРегулярками(Знач Текст)
 
-	Текст = СтрЗаменить(Текст, """""", "'");
+	СпецСимвол = Символ(0); 
+	Текст = СтрЗаменить(Текст, """""", СпецСимвол);
 
 	РегВыражение = Новый РегулярноеВыражение("[\{]""#"",""([^""]+)[""][\}]");
 	МассивСовпадений = РегВыражение.НайтиСовпадения(Текст);
 
 	Массив = Новый Массив();
 
 	Для каждого Совпадение Из МассивСовпадений Цикл
-		Массив.Добавить(Совпадение.Группы[1].Значение);
+		Значение = СтрЗаменить(Совпадение.Группы[1].Значение, СпецСимвол, """""");
+		Массив.Добавить(Значение);
 	КонецЦикла;
 
 	ТаблицаВерсий = СформироватьТаблицуВерсий(Массив);

tests/fixtures/report.quoted.mxl.txt

@@ -12,11 +12,27 @@
 	ИменаТестов = Новый Массив;
 
 	ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОтчетаХранилища");
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии");
 
 	Возврат ИменаТестов;
 
 КонецФункции
 
+Процедура ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии() Экспорт
+
+	ПутьКФайлуОтчета = ОбъединитьПути(ТекущийСценарий().Каталог, "fixtures", "report.quoted.mxl.txt");
+	ПарсерОтчетаХранилища = Новый ПарсерОтчетаХранилища;
+	ТаблицаВерсийХранилища = ПарсерОтчетаХранилища.ПрочитатьФайлОтчетаХранилища(ПутьКФайлуОтчета);
+	Ожидаем.Что(ТаблицаВерсийХранилища.Количество(), "Количество версий должно быть равны").Равно(2);
+	Ожидаем.Что(ТаблицаВерсийХранилища[1].Комментарий).Равно(
+		"Многострочный комментарий к версии хранилища, содержащий:
+		|* ""двойные кавычки""
+		|* 'одинарные кавычки'
+		|* несколько кавычек подряд: """""" и '''");
+
+
+КонецПроцедуры // ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии()
+
 Процедура ТестДолжен_ПроверитьЧтениеОтчетаХранилища() Экспорт
 
 	ПутьКФайлуОтчета = ОбъединитьПути(ТекущийСценарий().Каталог, "fixtures", "report.mxl.txt");