Skip to content

Commit

Permalink
Исправлена проблема, если имя файла и внутреннее имя обработки отлича…
Browse files Browse the repository at this point in the history
…ются регистром
  • Loading branch information
artbear committed Jan 30, 2018
1 parent 3c12a77 commit 969aca3
Showing 1 changed file with 8 additions and 1 deletion.
9 changes: 8 additions & 1 deletion tools/runner.os
Original file line number Diff line number Diff line change
Expand Up @@ -410,6 +410,7 @@
УдалитьФайлы(ФайлКуда.ПолноеИмя);
КонецЕсли;
ПереместитьФайл(ФайлМодуля.ПолноеИмя, ФайлКуда.ПолноеИмя);
Ожидаем.Что(ФайлКуда.Существует(), СтрШаблон("Файл должен существовать, а его нет. %1")).ЭтоИстина();
КонецЕсли;

КонецПроцедуры
Expand Down Expand Up @@ -1319,13 +1320,15 @@
Лог.Отладка("Нашли файлов для переименования: " + НайденныеФайлы.Количество());
Для Каждого НайденныйФайл Из НайденныеФайлы Цикл

Если НайденныйФайл.Имя = Файл.ИмяБезРасширения Тогда
Если НормализованноеИмяФайла(НайденныйФайл.Имя) = НормализованноеИмяФайла(Файл.ИмяБезРасширения) Тогда
Прервать;
КонецЕсли;

Если НайденныйФайл.ЭтоФайл() Тогда
Лог.Отладка("Перед перемещением файла %1 в %2", НайденныйФайл.ПолноеИмя, ОбъединитьПути(НайденныйФайл.Путь, Файл.ИмяБезРасширения) + ".xml");
ПереместитьФайл(НайденныйФайл.ПолноеИмя, ОбъединитьПути(НайденныйФайл.Путь, Файл.ИмяБезРасширения) + ".xml");
Иначе
Лог.Отладка("Перед копированием каталога %1 в каталог %2", НайденныйФайл.ПолноеИмя, ОбъединитьПути(НайденныйФайл.Путь, Файл.ИмяБезРасширения));
ФС.КопироватьСодержимоеКаталога(НайденныйФайл.ПолноеИмя, ОбъединитьПути(НайденныйФайл.Путь, Файл.ИмяБезРасширения));
УдалитьФайлы(НайденныйФайл.ПолноеИмя);
КонецЕсли;
Expand Down Expand Up @@ -2663,6 +2666,10 @@
/////////////////////////////////////////////////////////////////////////////
// РЕАЛИЗАЦИЯ КОМАНД

Функция НормализованноеИмяФайла(Знач ПутьФайла)
Возврат НРег(ПутьФайла);
КонецФункции

Функция ОбернутьПутьВКавычки(Знач Путь) Экспорт

Результат = Путь;
Expand Down

0 comments on commit 969aca3

Please sign in to comment.