let
fi_has_persistent_selection fi =
(
match
fi.
T
.fi_init_marks
with
None
->
false
|
_
->
true
)