diff --git "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\224\320\270\321\201\320\277\320\265\321\202\321\207\320\265\321\200\320\232\320\276\320\274\320\260\320\275\320\264\320\237\321\200\320\270\320\273\320\276\320\266\320\265\320\275\320\270\321\217.os" "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\224\320\270\321\201\320\277\320\265\321\202\321\207\320\265\321\200\320\232\320\276\320\274\320\260\320\275\320\264\320\237\321\200\320\270\320\273\320\276\320\266\320\265\320\275\320\270\321\217.os" index 38eab66..f9ea4c4 100644 --- "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\224\320\270\321\201\320\277\320\265\321\202\321\207\320\265\321\200\320\232\320\276\320\274\320\260\320\275\320\264\320\237\321\200\320\270\320\273\320\276\320\266\320\265\320\275\320\270\321\217.os" +++ "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\224\320\270\321\201\320\277\320\265\321\202\321\207\320\265\321\200\320\232\320\276\320\274\320\260\320\275\320\264\320\237\321\200\320\270\320\273\320\276\320\266\320\265\320\275\320\270\321\217.os" @@ -218,7 +218,7 @@ ТихийРежим = ЗначенияПараметров["-q"]; Если ЗначенияПараметров["-remote"] Тогда - ТекстСообщения = СтрШаблон("Пакеты в хабе :"); + ТекстСообщения = СтрШаблон("Пакеты в хабе:"); КэшПакетовВХабе = Новый КэшПакетовХаба(); УстановленныеПакеты = КэшПакетовВХабе.ПолучитьПакетыХаба(); Иначе @@ -235,7 +235,12 @@ КонецЕсли; Для Каждого УстановленныйПакет Из УстановленныеПакеты Цикл - Сообщить(УстановленныйПакет.Ключ); + СтрокаСообщения = УстановленныйПакет.Ключ; + Если ТипЗнч(УстановленныйПакет.Значение) = Тип("ОписаниеПакета") Тогда + ОписаниеПакета = УстановленныйПакет.Значение; + СтрокаСообщения = СтрокаСообщения + "@" + ОписаниеПакета.Свойства().Версия; + КонецЕсли; + Сообщить(СтрокаСообщения); КонецЦикла; КонецПроцедуры diff --git "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\321\215\321\210\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\273\320\265\320\275\320\275\321\213\321\205\320\237\320\260\320\272\320\265\321\202\320\276\320\262.os" "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\321\215\321\210\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\273\320\265\320\275\320\275\321\213\321\205\320\237\320\260\320\272\320\265\321\202\320\276\320\262.os" index 2f4458f..a36e541 100644 --- "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\321\215\321\210\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\273\320\265\320\275\320\275\321\213\321\205\320\237\320\260\320\272\320\265\321\202\320\276\320\262.os" +++ "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\321\215\321\210\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\273\320\265\320\275\320\275\321\213\321\205\320\237\320\260\320\272\320\265\321\202\320\276\320\262.os" @@ -41,8 +41,23 @@ Процедура ДобавитьУстановленныйПакет(Знач ФайлКаталога) - // TODO - здесь какое-то мета-описание нужно вместо Истины - УстановленныеПакеты.Вставить(ФайлКаталога.Имя, Истина); + ПутьКФайлуМетаданных = ОбъединитьПути(ФайлКаталога.ПолноеИмя, Константы.ИмяФайлаМетаданныхПакета); + ФайлМетаданных = Новый Файл(ПутьКФайлуМетаданных); + Если ФайлМетаданных.Существует() Тогда + + Чтение = Новый ЧтениеXML; + Чтение.ОткрытьФайл(ПутьКФайлуМетаданных); + Лог.Отладка("XML загружен"); + Сериализатор = Новый СериализацияМетаданныхПакета; + МетаОписаниеПакета = Сериализатор.ПрочитатьXML(Чтение); + + Чтение.Закрыть(); + + Иначе + МетаОписаниеПакета = Истина; + КонецЕсли; + + УстановленныеПакеты.Вставить(ФайлКаталога.Имя, МетаОписаниеПакета); КонецПроцедуры diff --git "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\272\320\260\320\237\320\260\320\272\320\265\321\202\320\260.os" "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\272\320\260\320\237\320\260\320\272\320\265\321\202\320\260.os" index 450a205..4598cc0 100644 --- "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\272\320\260\320\237\320\260\320\272\320\265\321\202\320\260.os" +++ "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\243\321\201\321\202\320\260\320\275\320\276\320\262\320\272\320\260\320\237\320\260\320\272\320\265\321\202\320\260.os" @@ -43,6 +43,7 @@ Если СтандартнаяОбработка Тогда СгенерироватьСкриптыЗапускаПриложенийПриНеобходимости(ПутьУстановки.ПолноеИмя, Метаданные); КонецЕсли; + СохранитьФайлМетаданныхПакета(ПутьУстановки.ПолноеИмя, ФайлМетаданных); ЧтениеПакета.Закрыть(); @@ -389,6 +390,14 @@ КонецФункции +Процедура СохранитьФайлМетаданныхПакета(Знач КаталогУстановки, Знач ПутьКФайлуМетаданных) + + ПутьСохранения = ОбъединитьПути(КаталогУстановки, Константы.ИмяФайлаМетаданныхПакета); + ДанныеФайла = Новый ДвоичныеДанные(ПутьКФайлуМетаданных); + ДанныеФайла.Записать(ПутьСохранения); + +КонецПроцедуры + ////////////////////////////////////////////////////////////////////////////////// //