Fixes #50: Регистронезависимая установка пакета.

Имя пакета автоматически приводится в соответствие с регистром файлов, хранящихся в хабе.

Author: dmpas

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

@@ -205,17 +205,46 @@
 СкачатьИУстановитьПакет(ОписаниеПакета.ИмяПакета, ОписаниеПакета.МинимальнаяВерсия);
 КонецПроцедуры
 
+// Функция по имени пакета определяет имя архива в хабе
+// https://github.com/oscript-library/opm/issues/50
+// Имена файлов в хабе регистрозависимы, однако имена пакетов по обыкновению регистронезависимы
+Функция ОпределитьИмяАрхива(Знач ИмяПакета)
+
+КэшПакетовВХабе = Новый КэшПакетовХаба();
+ПакетыХаба = КэшПакетовВХабе.ПолучитьПакетыХаба();
+
+Если ПакетыХаба.Получить(ИмяПакета) = Неопределено Тогда
+
+Для Каждого мПакет Из ПакетыХаба Цикл
+
+// Проводим регистронезависимое сравнение имён
+Если нрег(мПакет.Ключ) = нрег(ИмяПакета) Тогда
+
+// и возвращаем ровно то имя, которое хранится в хабе (с учётом регистра)
+Возврат мПакет.Ключ;
+
+КонецЕсли;
+
+КонецЦикла;
+
+КонецЕсли;
+
+Возврат ИмяПакета;
+
+КонецФункции
+
 Процедура СкачатьИУстановитьПакет(Знач ИмяПакета, Знач ВерсияПакета)
 
+ИмяАрхива = ОпределитьИмяАрхива(ИмяПакета);
 Если ВерсияПакета <> Неопределено Тогда
-ФайлПакета = ИмяПакета + "-" + ВерсияПакета + ".ospx";
+ФайлПакета = ИмяАрхива + "-" + ВерсияПакета + ".ospx";
 Иначе
-ФайлПакета = ИмяПакета + ".ospx";
+ФайлПакета = ИмяАрхива + ".ospx";
 КонецЕсли;
 
 Лог.Информация("Скачиваю файл: " + ФайлПакета);
 
-Ответ = Зеркала.ПолучитьРесурс(ИмяПакета + "/" + ФайлПакета);
+Ответ = Зеркала.ПолучитьРесурс(ИмяАрхива + "/" + ФайлПакета);
 Если Не Ответ = Неопределено Тогда
 Лог.Отладка("Файл получен");
 ВремФайл = ОбъединитьПути(КаталогВременныхФайлов(), ФайлПакета);