Bläddra i källkod

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

Jocelyn Boullier 4 år sedan
förälder
incheckning
c46163e4df
1 ändrade filer med 1 tillägg och 0 borttagningar
  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 =