mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 10:58:26 +00:00
@ -154,14 +154,21 @@ tabState settings openTabs cfmodel toggle tab =
|
||||
_ ->
|
||||
False
|
||||
|
||||
state =
|
||||
if hidden then
|
||||
TB.Hidden
|
||||
|
||||
else if Set.member tab.name openTabs then
|
||||
folded =
|
||||
if Set.member tab.name openTabs then
|
||||
TB.Open
|
||||
|
||||
else
|
||||
TB.Closed
|
||||
|
||||
state =
|
||||
{ folded = folded
|
||||
, look =
|
||||
if hidden then
|
||||
TB.Hidden
|
||||
|
||||
else
|
||||
TB.Normal
|
||||
}
|
||||
in
|
||||
( state, toggle tab )
|
||||
|
Reference in New Issue
Block a user