$maybe route <- mcurrentRoute $maybe avatar <- maybeAvatar Avatar for #{userFullName user}

#{userFullName user} $forall key <- pgpKeys #{prettyPgp key}

#{userNote user} #{userEmail user} $forall (site, profile) <- userProfiles #{profileUsername profile}