Fix #227 Перевод fluent-операций на lambdas

oscript-library · Dec 10, 2024 · 34edf02 · 34edf02
1 parent a1642fc
commit 34edf02
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 4 deletions.
diff --git a/src/cmd/Классы/КомандаOpm_List.os b/src/cmd/Классы/КомандаOpm_List.os
@@ -85,7 +85,14 @@
 	КонецЦикла;
 
 	Пакеты = ПроцессорыКоллекций.ИзКоллекции(Пакеты)
-		.СортироватьПо("ИмяПакета", "Результат = НРег(Элемент1) > НРег(Элемент2)")
+		.СортироватьПо("ИмяПакета", "(Первый, Второй) ->
+		  | НРегПервый = НРег(Первый);
+		  | НРегВторой = НРег(Второй);
+		  |
+		  | Если НРегПервый > НРегВторой Тогда Возврат 1;
+          | ИначеЕсли НРегВторой > НРегПервый Тогда Возврат -1;
+          | Иначе Возврат 0;
+          | КонецЕсли;")
 		.Получить(Тип("ТаблицаЗначений"));
 
 	ВывестиИнформациюОПакетах(Пакеты);

diff --git a/src/core/Модули/РаботаСПакетами.os b/src/core/Модули/РаботаСПакетами.os
@@ -148,11 +148,9 @@
 	Если РежимУстановки <> РежимУстановкиПакетов.Локально Тогда
 		Возврат;
 	КонецЕсли;
-
-	ИмяПакета = ОписаниеПакета.Свойства().Имя;
 
 	КаталогиИсполняемыхФайлов = ПроцессорыКоллекций.ИзКоллекции(ОписаниеПакета.ИсполняемыеФайлы())
-		.Обработать("Результат = Новый Файл(ОбъединитьПути(ДополнительныеПараметры.КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
+		.Обработать("Элемент -> Новый Файл(ОбъединитьПути(КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
 		.Различные()
 		.ВМассив();