$forall ((Entity userId user), roles) <- users $with mroute <- can (coreR $ UserAdminR $ UserAdminEditR userId) "GET"

_{Msg.Username}	Roles	_{Msg.EmailAddress}	_{Msg.AccountStatus}	_{Msg.CreatedOn}	_{Msg.LastLogin}
$maybe r <- mroute #{userName user} $nothing #{userName user}	$forall role <- roles #{show role}	#{userEmail user} $maybe _ <- userToken user	_{Msg.AccountPending} $nothing $if userActive user	_{Msg.AccountActive} $else	_{Msg.AccountInactive}	#{show $ utctDay $ userCreatedAt user}	$maybe ll <- userLastLogin user #{humanReadableTimeI18N' hrtLocale timeNow $ ll} $nothing -