$newline never $# extra protects us against CSRF #{extra} $# Maybe display textField for passcode $maybe secretView <- msecretView ^{fvLabel secretView} ^{fvWidget secretView} $# Ask for associated primary field uf study, unless registered $maybe sfView <- msfView ^{fvLabel sfView} ^{fvWidget sfView} $# Always display register/deregister button ^{fvWidget btnView}