$newline never
<h1>
  ^{nameWidget (userDisplayName user) (userSurname user)}

<table .table .table--striped .table--hover>
  <thead>
    <tr .table__row .table__row--head>
      <td>
      <td .table__th>_{MsgExamUserSyncOfficeName}
      <td .table__th>_{MsgExamUserSyncTime}
      <td .table__th>_{MsgExamUserSyncSchools}
    $forall sync <- syncs'
      $case sync
        $of Right (officeDisplayName, officeSurname, time, sshs)
          <tr .table__row>
            <td>
            <td .table__td>
              ^{nameWidget officeDisplayName officeSurname}
            <td .table__td>
              ^{formatTimeW SelFormatDateTime time}
            <td .table__td>
              <ul .list--inline .list--comma-separated>
                $forall ssh' <- sshs
                  #{ssh'}
        $of Left lastChange
          <tr .table__row>
            <td .table__td style="text-align: right">
              _{MsgExamUserSyncLastChange}
            <td .table__td>
            <td .table__td>
              ^{formatTimeW SelFormatDateTime lastChange}
            <td .table__td>
