Исправление сортировки

Author: nixel2007

src/Классы/Поток.os

@@ -210,15 +210,15 @@
 		Флаг = Ложь;
 		к = Результат.Количество() - 1;
 		Пока к > й Цикл
-			Элемент = Результат[к - 1];
-			СледующийЭлемент = Результат[к];
+			Элемент = Результат[к];
+			СледующийЭлемент = Результат[к - 1];
 			Обработчик.ДополнительныеПараметры.Элемент1 = Элемент;
 			Обработчик.ДополнительныеПараметры.Элемент2 = СледующийЭлемент;
 			РезультатСортировки = Неопределено;
 			ОписанияОповещений.ВыполнитьОбработкуОповещения(Обработчик, РезультатСортировки);
 			Если РезультатСортировки > 0 Тогда
-				Результат[к - 1] = СледующийЭлемент;
-				Результат[к] = Элемент;
+				Результат[к] = СледующийЭлемент;
+				Результат[к - 1] = Элемент;
 				Флаг = Истина;
 			КонецЕсли;
 			к = к - 1;