Merge pull request #38 from Shining-Phoenix/bug_increment

Исправил ошибку "папка не пуста" при инкрементальной выгрузке

Author: khorevaa

src/Классы/increment.os

@@ -110,7 +110,7 @@
 	Лог.Отладка("Проверяю возможность обновления выгрузки для файла <%1>", ПутьКФайлуВерсийМетаданных);
 
 	ВыгрузкаИзмененийВозможна = ТекущийФайлВерсийМетаданных.Существует()
-		И ПроверитьВозможностьОбновленияФайловВыгрузки(Конфигуратор, КаталогВыгрузки, ПутьКФайлуВерсийМетаданных);
+		И ПроверитьВозможностьОбновленияФайловВыгрузки(Конфигуратор, ПутьКФайлуВерсийМетаданных);
 
 	Лог.Отладка("Инкрементальная выгрузка конфигурации - %1", ?(ВыгрузкаИзмененийВозможна, "ВОЗМОЖНА", "НЕВОЗМОЖНА"));
 
@@ -174,22 +174,23 @@
 //  Возвращаемое значение:
 //   Булево - обновление возможно?
 //
-Функция ПроверитьВозможностьОбновленияФайловВыгрузки(Конфигуратор, Знач КаталогВыгрузки, Знач ПутьКФайлуВерсийДляСравнения = "")
+
+Функция ПроверитьВозможностьОбновленияФайловВыгрузки(Конфигуратор, Знач ПутьКФайлуВерсийДляСравнения = "")
 
 	ОбновлениеВозможно = Ложь;
+
+	КаталогПроверки = ВременныеФайлы.СоздатьКаталог();
 
-	// КаталогВыгрузки = ВременныеФайлы.СоздатьКаталог();
-	
-	ТекущийФайлВерсийМетаданных = Новый Файл(ОбъединитьПути(КаталогВыгрузки, "ConfigDumpInfo.xml"));
+	ТекущийФайлВерсийМетаданных = Новый Файл(ОбъединитьПути(КаталогПроверки, "ConfigDumpInfo.xml"));
 
-	Если НЕ ТекущийФайлВерсийМетаданных.Существует() И ПустаяСтрока(ПутьКФайлуВерсийДляСравнения) Тогда
+	Если ПустаяСтрока(ПутьКФайлуВерсийДляСравнения) Тогда
 	 	Возврат ОбновлениеВозможно;
 	КонецЕсли;
 
 	ПутьКФайлуИзменений = ВременныеФайлы.НовоеИмяФайла();
 
 	Параметры = Конфигуратор.ПолучитьПараметрыЗапуска();
-	Параметры.Добавить(СтрШаблон("/DumpConfigToFiles %1", ОбернутьВКавычки(КаталогВыгрузки)));
+	Параметры.Добавить(СтрШаблон("/DumpConfigToFiles %1", ОбернутьВКавычки(КаталогПроверки)));
 	Параметры.Добавить(СтрШаблон("-getChanges %1", ОбернутьВКавычки(ПутьКФайлуИзменений)));
 
 	Если ЗначениеЗаполнено(ИмяРасширения) Тогда
@@ -222,11 +223,11 @@
 		ВременныеФайлы.УдалитьФайл(ПутьКФайлуИзменений);
 	КонецЕсли;
 
+	ВременныеФайлы.УдалитьФайл(КаталогПроверки);
 
 	Возврат ОбновлениеВозможно;
 
 КонецФункции
-
 Функция ОбернутьВКавычки(Знач Строка)
 	Возврат """" + Строка + """";
 КонецФункции