Hint gets lost
The initial interface of the following program is correct. After one (or a few) editing steps the hint "view" disappears.
enterSharedList :: Task [Int]
enterSharedList =
withShared [] \sds.
(Title "editor" @>> updateSharedInformation [] sds)
-|| (Hint "view" @>> viewSharedInformation [] sds)
-|| (Hint "Count" @>> viewSharedInformation [ViewAs length] sds)