Перенесена инициализация зеркал.

Зеркала инициализируются при первом обращении из-за неполадок при
загрузке классов из модулей.

Author: dmpas

src/opm.os

@@ -51,26 +51,11 @@
 	Возврат Новый ДиспетчерКомандПриложения();
 КонецФункции
 
-Процедура Инициализация()
-
-	ОсновноеЗеркало = Новый Зеркало;
-	ОсновноеЗеркало.СерверУдаленногоХранилища = Константы.СерверУдаленногоХранилища;
-	ОсновноеЗеркало.ПутьВХранилище            = Константы.ПутьВХранилище;
-
-	ЗапасноеЗеркало = Новый Зеркало;
-	ЗапасноеЗеркало.СерверУдаленногоХранилища = Константы.СерверЗапасногоХранилища;
-	ЗапасноеЗеркало.ПутьВХранилище            = Константы.ПутьВЗапасномХранилище;
-
-	Зеркала.Добавить(ОсновноеЗеркало);
-	Зеркала.Добавить(ЗапасноеЗеркало);
-
-КонецПроцедуры
 
 /////////////////////////////////////////////////////////////////////////
 // Точка входа
 
 Лог = Логирование.ПолучитьЛог(Константы.ИмяЛога);
 НастройкиПриложения.УстановитьФайлНастроек(ОбъединитьПути(СтартовыйСценарий().Каталог, "opm.cfg"));
-Инициализация();
 
 ВыполнитьКоманду(АргументыКоманднойСтроки);

src/Модули/Зеркала.os

@@ -12,6 +12,10 @@
 
 	Если ПодключенноеЗеркало = Неопределено Тогда
 
+		Если Зеркала = Неопределено Тогда
+			Инициализация();
+		КонецЕсли;
+
 		Для Каждого мЗеркало Из Зеркала Цикл
 
 			Ответ  = мЗеркало.ПолучитьРесурс(ИмяРесурса);
@@ -78,6 +82,15 @@
 
 	Зеркала = Новый Массив;
 
-КонецПроцедуры
+	ОсновноеЗеркало = Новый("Зеркало");
+	ОсновноеЗеркало.СерверУдаленногоХранилища = Константы.СерверУдаленногоХранилища;
+	ОсновноеЗеркало.ПутьВХранилище            = Константы.ПутьВХранилище;
 
-Инициализация();
+	ЗапасноеЗеркало = Новый("Зеркало");
+	ЗапасноеЗеркало.СерверУдаленногоХранилища = Константы.СерверЗапасногоХранилища;
+	ЗапасноеЗеркало.ПутьВХранилище            = Константы.ПутьВЗапасномХранилище;
+
+	Зеркала.Добавить(ОсновноеЗеркало);
+	Зеркала.Добавить(ЗапасноеЗеркало);
+
+КонецПроцедуры