Новая проверка на exe для версии oscript 1.4.0

Author: khorevaa

src/cmd/Модули/ПараметрыПриложения.os

@@ -126,7 +126,7 @@
 Функция ЭтоСборкаEXE() Экспорт
 
 	Если ЭтоПриложениеEXE = Неопределено Тогда
-		ЭтоПриложениеEXE = ВРег(Прав(ТекущийСценарий().Источник, 3)) = "EXE";
+		ЭтоПриложениеEXE = НРег(Лев(ТекущийСценарий().Источник, 10)) = "oscript://";
 	КонецЕсли;
 
 	Возврат ЭтоПриложениеEXE;

src/core/Классы/internal/Классы/ПодключениеПлагиновКаталога.os

@@ -7,7 +7,7 @@
 
 	МассивПодключенныхПлагинов = Новый Массив();
 
-	Если ВРег(Прав(ТекущийСценарий().Источник, 3)) = "EXE" Тогда
+	Если НРег(Лев(ТекущийСценарий().Источник, 10)) = "oscript://" Тогда
 		Возврат МассивПодключенныхПлагинов;
 	КонецЕсли;
 
@@ -71,7 +71,7 @@
 					Идентификатор = Чтение.ЗначениеАтрибута("name");
 					Если Не ПустаяСтрока(Идентификатор) Тогда
 						ПодключитьСценарий(ФайлКласса.ПолноеИмя, Идентификатор);
-						МассивПодключенныхПлагинов.Добавить(Идентификатор);
+						МассивПодключенныхПлагинов.Добавить(Идентификатор);									
 					КонецЕсли;
 				Иначе
 					ВызватьИсключение "Не найден файл " + ФайлКласса.ПолноеИмя + ", указанный в манифесте";