Исправление бага неверных настроек при чтении из старого файла настроек

Была ошибка выполнения, когда в старом файле настроек не было новой настройки. #58

Author: artbear

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

@@ -42,8 +42,7 @@
 
 	// TODO сделать конвертацию терминов json в русские свойства настроек
 
-	мНастройки = Настройки;
-
+	мНастройки = ЗаполнитьНесуществующиеНастройкиПоУмолчанию(Настройки);
 КонецПроцедуры
 
 Функция ПрочитатьФайл(Знач Путь)
@@ -65,12 +64,29 @@
  КонецПроцедуры
 
 Процедура УстановитьНастройкиПоУмолчанию()
-	мНастройки = Новый Структура;
-	НастройкиПроксиПоУмолчанию = НастройкиПроксиПроксиПоУмолчанию();
-	мНастройки.Вставить("Прокси", НастройкиПроксиПоУмолчанию);
-	мНастройки.Вставить("СоздаватьShСкриптЗапуска", Ложь)
+	мНастройки = НастройкиПоУмолчанию();
 КонецПроцедуры
 
+Функция ЗаполнитьНесуществующиеНастройкиПоУмолчанию(Настройки)
+	НовыеНастройки = НастройкиПоУмолчанию();
+	Для каждого Настройка Из Настройки Цикл
+		Значение = Настройка.Значение;
+		Если ТипЗнч(Значение) = Тип("Структура") Тогда
+			Значение = ЗаполнитьНесуществующиеНастройкиПоУмолчанию(Значение);
+		КонецЕсли;
+		НовыеНастройки.Вставить(Настройка.Ключ, Значение);
+	КонецЦикла;
+	Возврат НовыеНастройки;
+КонецФункции
+
+Функция НастройкиПоУмолчанию()
+	Рез = Новый Структура;
+	НастройкиПроксиПоУмолчанию = НастройкиПроксиПроксиПоУмолчанию();
+	Рез.Вставить("Прокси", НастройкиПроксиПоУмолчанию);
+	Рез.Вставить("СоздаватьShСкриптЗапуска", Ложь);
+	Возврат Рез;
+КонецФункции
+
 Функция НастройкиПроксиПроксиПоУмолчанию()
 
 	СтруктураПрокси = Новый Структура();