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

fix(Sidebar): put tab at the end when moving it between groups

Jocelyn Boullier преди 4 години
родител
ревизия
c46163e4df
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      src/Sidebar/Components/Bar.purs

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

@@ -524,6 +524,7 @@ lastWinTabIndexInGroup gid =
     >>> A.filter (T.snd >>> T.snd >>> (==) gid)
     >>> map T.fst
     >>> A.last
+    >>> map ((+) 1)
 
 findNextGroupId :: S.Set GroupId -> GroupId
 findNextGroupId values =