diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260Opm_List.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260Opm_List.os"
index c1a7420..4949eb3 100644
--- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260Opm_List.os"
+++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260Opm_List.os"
@@ -85,7 +85,14 @@
 	КонецЦикла;
 	
 	Пакеты = ПроцессорыКоллекций.ИзКоллекции(Пакеты)
-		.СортироватьПо("ИмяПакета", "Результат = НРег(Элемент1) > НРег(Элемент2)")
+		.СортироватьПо("ИмяПакета", "(Первый, Второй) ->
+		  | НРегПервый = НРег(Первый);
+		  | НРегВторой = НРег(Второй);
+		  |
+		  | Если НРегПервый > НРегВторой Тогда Возврат 1;
+          | ИначеЕсли НРегВторой > НРегПервый Тогда Возврат -1;
+          | Иначе Возврат 0;
+          | КонецЕсли;")
 		.Получить(Тип("ТаблицаЗначений"));
 	
 	ВывестиИнформациюОПакетах(Пакеты);
diff --git "a/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\237\320\260\320\272\320\265\321\202\320\260\320\274\320\270.os" "b/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\237\320\260\320\272\320\265\321\202\320\260\320\274\320\270.os"
index 3960ede..0d51440 100644
--- "a/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\237\320\260\320\272\320\265\321\202\320\260\320\274\320\270.os"
+++ "b/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\237\320\260\320\272\320\265\321\202\320\260\320\274\320\270.os"
@@ -148,11 +148,9 @@
 	Если РежимУстановки <> РежимУстановкиПакетов.Локально Тогда
 		Возврат;
 	КонецЕсли;
-
-	ИмяПакета = ОписаниеПакета.Свойства().Имя;
 	
 	КаталогиИсполняемыхФайлов = ПроцессорыКоллекций.ИзКоллекции(ОписаниеПакета.ИсполняемыеФайлы())
-		.Обработать("Результат = Новый Файл(ОбъединитьПути(ДополнительныеПараметры.КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
+		.Обработать("Элемент -> Новый Файл(ОбъединитьПути(КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
 		.Различные()
 		.ВМассив();