From cd8ba20f54f3a3a8898da021891f8202cd6ed182 Mon Sep 17 00:00:00 2001
From: AKuznetsov <arkuznetsov@gmail.com>
Date: Wed, 29 May 2019 17:01:27 +0300
Subject: [PATCH] =?UTF-8?q?#33=20=D0=92=D0=B5=D1=80=D0=BD=D1=83=D0=BB=20?=
 =?UTF-8?q?=D0=BE=D0=B1=D1=85=D0=BE=D0=B4=20=D0=BE=D1=88=D0=B8=D0=B1=D0=BA?=
 =?UTF-8?q?=D0=B8,=20=D1=81=D0=B2=D1=8F=D0=B7=D0=B0=D0=BD=D0=BD=D0=BE?=
 =?UTF-8?q?=D0=B9=20=D1=81=20=D0=BF=D0=B5=D1=80=D0=B5=D0=BC=D0=B5=D0=BD?=
 =?UTF-8?q?=D0=BD=D1=8B=D0=BC=D0=B8=20=D1=81=D1=80=D0=B5=D0=B4=D1=8B=20?=
 =?UTF-8?q?=D0=BF=D1=80=D0=B8=20=D1=81=D1=82=D0=B0=D1=80=D1=82=D0=B5=20?=
 =?UTF-8?q?=D0=BD=D0=BE=D0=B2=D0=BE=D0=B3=D0=BE=20=D0=BF=D1=80=D0=BE=D1=86?=
 =?UTF-8?q?=D0=B5=D1=81=D1=81=D0=B0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 ...20\274\320\260\320\275\320\264\320\260.os" | 31 ++++++++++++++-----
 1 file changed, 24 insertions(+), 7 deletions(-)

diff --git "a/src/\320\232\320\276\320\274\320\260\320\275\320\264\320\260.os" "b/src/\320\232\320\276\320\274\320\260\320\275\320\264\320\260.os"
index 632495b..9372544 100644
--- "a/src/\320\232\320\276\320\274\320\260\320\275\320\264\320\260.os"
+++ "b/src/\320\232\320\276\320\274\320\260\320\275\320\264\320\260.os"
@@ -394,15 +394,32 @@
 			Процесс = СоздатьПроцесс(СтрокаЗапуска, РабочийКаталог, ПерехватыватьПотоки, ПерехватыватьПотоки, КодировкаВывода, ПеременныеСредыПроцесса);
 		КонецЕсли;
 
-
-	Исключение
-
-		Инфо = ИнформацияОбОшибке();
-
-		ВызватьИсключение Инфо.ПодробноеОписаниеОшибки();
+    Исключение
+        
+        Инфо = ИнформацияОбОшибке();
+
+        // TODO код проверки на регулярку (ниже) убрать после исправления в движке OneScript
+        РегуляркаОшибкиПеременныхСреды = Новый РегулярноеВыражение("\(System\.ArgumentException\):[^:]+:.*HOME[^:]+:.*home");
+        Если РегуляркаОшибкиПеременныхСреды.Совпадает(Инфо.Описание) Тогда
+            Лог.Предупреждение("Возникла ошибка, связанная с переменными среды при старте нового процесса
+                |%1
+                |
+                |Выполняю старт процесса без указания переменных среды.", Инфо.Описание);
+
+            Лог.Отладка("Полное описание ошибки:
+                |%1", Инфо.ПодробноеОписаниеОшибки());
+
+            Если КодировкаВывода = Неопределено Тогда
+                Процесс = СоздатьПроцесс(СтрокаЗапуска, РабочийКаталог, ПерехватыватьПотоки, ПерехватыватьПотоки);
+            Иначе
+                Процесс = СоздатьПроцесс(СтрокаЗапуска, РабочийКаталог, ПерехватыватьПотоки, ПерехватыватьПотоки, КодировкаВывода);        
+            КонецЕсли;
+        Иначе
+            ВызватьИсключение Инфо.ПодробноеОписаниеОшибки();
+        КонецЕсли;
 
 	КонецПопытки;
-
+	
 	Процесс.Запустить();
 
 	Возврат Процесс;