Skip to content

Commit 34edf02

Browse files
committed
Fix #227 Перевод fluent-операций на lambdas
1 parent a1642fc commit 34edf02

File tree

2 files changed

+9
-4
lines changed

2 files changed

+9
-4
lines changed

src/cmd/Классы/КомандаOpm_List.os

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -85,7 +85,14 @@
8585
КонецЦикла;
8686

8787
Пакеты = ПроцессорыКоллекций.ИзКоллекции(Пакеты)
88-
.СортироватьПо("ИмяПакета", "Результат = НРег(Элемент1) > НРег(Элемент2)")
88+
.СортироватьПо("ИмяПакета", "(Первый, Второй) ->
89+
| НРегПервый = НРег(Первый);
90+
| НРегВторой = НРег(Второй);
91+
|
92+
| Если НРегПервый > НРегВторой Тогда Возврат 1;
93+
| ИначеЕсли НРегВторой > НРегПервый Тогда Возврат -1;
94+
| Иначе Возврат 0;
95+
| КонецЕсли;")
8996
.Получить(Тип("ТаблицаЗначений"));
9097

9198
ВывестиИнформациюОПакетах(Пакеты);

src/core/Модули/РаботаСПакетами.os

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -148,11 +148,9 @@
148148
Если РежимУстановки <> РежимУстановкиПакетов.Локально Тогда
149149
Возврат;
150150
КонецЕсли;
151-
152-
ИмяПакета = ОписаниеПакета.Свойства().Имя;
153151

154152
КаталогиИсполняемыхФайлов = ПроцессорыКоллекций.ИзКоллекции(ОписаниеПакета.ИсполняемыеФайлы())
155-
.Обработать("Результат = Новый Файл(ОбъединитьПути(ДополнительныеПараметры.КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
153+
.Обработать("Элемент -> Новый Файл(ОбъединитьПути(КаталогУстановки, Элемент.Путь)).Путь", Новый Структура("КаталогУстановки", КаталогУстановки))
156154
.Различные()
157155
.ВМассив();
158156

0 commit comments

Comments
 (0)