Просмотр исходного кода

fix(sidebar): put tab at the end after drag-and-drop between groups

Jocelyn Boullier 4 лет назад
Родитель
Сommit
45819dd7ec
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      src/Sidebar/Components/Bar.purs

+ 1 - 1
src/Sidebar/Components/Bar.purs

@@ -463,7 +463,7 @@ lastWinTabIndexInGroup gid =
   A.mapWithIndex (Tuple)
     >>> A.filter (T.snd >>> T.snd >>> (==) gid)
     >>> map T.fst
-    >>> A.head
+    >>> A.last
 
 findNextGroupId :: S.Set GroupId -> GroupId
 findNextGroupId values =