ソースを参照

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 =