|
24 | 24 | МассивПутейНастроек.Добавить(мПутьФайлаНастроек); |
25 | 25 | КонецЕсли; |
26 | 26 |
|
27 | | - НастройкиНайденны = Ложь; |
| 27 | + НастройкиНайдены = Ложь; |
28 | 28 | Для каждого Элемент из МассивПутейНастроек Цикл |
29 | | - Если НастройкиНайденны Тогда |
30 | | - Прервать; |
31 | | - КонецЕсли; |
32 | 29 | мСтарыйПуть = мПутьФайлаНастроек; |
33 | 30 | УстановитьФайлНастроек(Элемент); |
| 31 | + Если НЕ Новый Файл(Элемент).Существует() Тогда |
| 32 | + Продолжить; |
| 33 | + КонецЕсли; |
34 | 34 | Попытка |
35 | 35 | ПрочитатьФайлНастроек(); |
36 | | - НастройкиНайденны = Истина; |
| 36 | + НастройкиНайдены = Истина; |
| 37 | + Прервать; |
37 | 38 | Исключение |
38 | 39 | Лог.Отладка("Чтение файла настроек " + мПутьФайлаНастроек+": |
39 | 40 | |" + ОписаниеОшибки()); |
40 | 41 |
|
41 | 42 | КонецПопытки; |
42 | 43 | КонецЦикла; |
43 | 44 |
|
44 | | - Если НастройкиНайденны = Ложь Тогда |
| 45 | + Если НастройкиНайдены = Ложь Тогда |
45 | 46 | УстановитьНастройкиПоУмолчанию(); |
46 | 47 | КонецЕсли; |
47 | 48 |
|
|
189 | 190 | КонецПроцедуры |
190 | 191 | //------------ |
191 | 192 |
|
192 | | -// Возвращет массив путей, где может находиться файла настроек opm |
193 | | -// Каталог opm (для совместимости), текущий каталог запуска, домашний каталог пользователя, системная настройка. |
| 193 | +// Возвращает массив путей, где может находиться файла настроек opm |
| 194 | +// Текущий каталог запуска, домашний каталог пользователя, системная настройка, каталог opm (для совместимости). |
194 | 195 | Функция СписокФайловНастроек() |
195 | 196 | Перем ИмяФайл; |
196 | | - ИмяФайл = "opm.cfg"; |
| 197 | + ИмяФайл = КонстантыOpm.ИмяФайлаНастроек; |
197 | 198 | МассивФайлов = Новый Массив; |
198 | 199 | //Текущий каталог |
199 | 200 | МассивФайлов.Добавить(ОбъединитьПути(ТекущийКаталог(), ИмяФайл)); |
|
0 commit comments