Восстановление рабочего каталога после сборки

Author: EvilBeaver

src/Классы/СборщикПакета.os

@@ -16,6 +16,7 @@
 Процедура СобратьПакет(Знач КаталогИсходников, Знач ФайлМанифеста, Знач ВыходнойКаталог) Экспорт
 
 	РабочийКаталог = КаталогИсходников;
+	ТекущийРабКаталог = ТекущийКаталог();
 
 	Попытка
 
@@ -32,11 +33,11 @@
 		УточнитьФайлМанифеста(ФайлМанифеста);
 		Манифест = ПрочитатьМанифест(ФайлМанифеста);
 		СобратьПакетВКаталогеСборки(Манифест, ВыходнойКаталог);
-		
+		УстановитьТекущийКаталог(ТекущийРабКаталог);
 		Сообщить("Сборка пакета завершена");
 
 	Исключение
-		
+		УстановитьТекущийКаталог(ТекущийРабКаталог);
 		ВременныеФайлы.Удалить();
 		ВызватьИсключение;