Merge pull request #7 from asosnoviy/opmconfig

proxy config дубль 2

Author: EvilBeaver

src/Классы/ДиспетчерКомандПриложения.os

@@ -56,7 +56,7 @@
 Процедура ДобавитьКомандуConfig(Знач Парсер)
  	Команда = Парсер.ОписаниеКоманды("config", "Задать пользовательские настройки");
  	Парсер.ДобавитьПозиционныйПараметрКоманды(Команда, "-proxyusedefault","Использовать ПроксиПоУмолчанию (системные настройки)");
- 	Парсер.ДобавитьИменованныйПараметрКоманды(Команда, "-proxyserver", "Адресс прокси");
+ 	Парсер.ДобавитьИменованныйПараметрКоманды(Команда, "-proxyserver", "Адрес прокси");
  	Парсер.ДобавитьИменованныйПараметрКоманды(Команда, "-proxyport", "Порт прокси");
  	Парсер.ДобавитьИменованныйПараметрКоманды(Команда, "-proxyuser", "Пользователь прокси ");
  	Парсер.ДобавитьИменованныйПараметрКоманды(Команда, "-proxypass", "Пароль прокси");

src/Классы/УстановкаПакета.os

@@ -176,9 +176,9 @@
 	Если НастройкиПрокси.ИспользоватьПрокси = Истина Тогда
 		Прокси = Новый ИнтернетПрокси(НастройкиПрокси.ПроксиПоУмолчанию);
  		Если НастройкиПрокси.ПроксиПоУмолчанию = Ложь Тогда
- 			Прокси.Установить("HTTP",НастройкиПрокси.Сервер,НастройкиПрокси.Порт,НастройкиПрокси.Пользователь,НастройкиПрокси.Пароль);
+			Прокси.Установить("http",НастройкиПрокси.Сервер,НастройкиПрокси.Порт,НастройкиПрокси.Пользователь,НастройкиПрокси.Пароль,НастройкиПрокси.ИспользоватьАутентификациюОС);
  		КонецЕсли;	
-		Соединение = Новый HTTPСоединение(Сервер,,,Прокси);
+		Соединение = Новый HTTPСоединение(Сервер,,,,Прокси);
 	Иначе
 		Соединение = Новый HTTPСоединение(Сервер);
 	КонецЕсли;

src/Модули/НастройкиПриложения.os

@@ -79,6 +79,7 @@
 	СтруктураПрокси.Вставить("Порт");
 	СтруктураПрокси.Вставить("Пользователь");
 	СтруктураПрокси.Вставить("Пароль");
+	СтруктураПрокси.Вставить("ИспользоватьАутентификациюОС",Ложь);
 
 	Возврат СтруктураПрокси;
 КонецФункции	
@@ -113,7 +114,7 @@
 			мНастройки.Прокси.Пароль       = "";
 	КонецЕсли;	
 
-	мНастройки.Прокси.ИспользоватьПрокси =  мНастройки.Прокси.ПроксиПоУмолчанию ИЛИ мНастройки.Прокси.Сервер <> ""
+	мНастройки.Прокси.ИспользоватьПрокси =  мНастройки.Прокси.ПроксиПоУмолчанию ИЛИ ЗначениеЗаполнено(мНастройки.Прокси.Сервер)
 
 КонецПроцедуры
 //------------