Преглед на файлове

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

Jocelyn Boullier преди 4 години
родител
ревизия
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 =