Sort out send-email-verification form as command

Author: Lan2u

src/commands/members/send-email-verification-form.ts

@@ -19,13 +19,17 @@ const renderForm = (viewModel: ViewModel) =>
   pipe(
     html`
       <h1>Send email verification</h1>
+      <p>
+        In order to finish adding an email to your profile it needs to be verified. Click the button below
+        to send an email with a verification link to '${sanitizeString(viewModel.emailAddress)}'
+      </p>
       <form action="?next=/me" method="post">
-        <label for="email">Email address</label>
         <input
-          type="email"
+          type="hidden"
           name="email"
           id="email"
           value="${sanitizeString(viewModel.emailAddress)}"
+          readonly
         />
         <input
           type="hidden"

src/commands/members/send-email-verification-route.ts

@@ -13,7 +13,6 @@ import { renderTrainingMatrix } from '../training-matrix/render';
 import * as O from 'fp-ts/Option';
 import { MemberEmail } from '../../read-models/shared-state/return-types';
 import { EmailAddress } from '../../types';
-import { tooltip } from '../shared-render/tool-tip';
 
 const editFormOfAddress = (viewModel: ViewModel) => html`
   <a
@@ -23,9 +22,9 @@ const editFormOfAddress = (viewModel: ViewModel) => html`
   </a>
 `;
 
-const sendVerifyEmail = (email: EmailAddress) => html`
+const sendVerifyEmail = (memberNumber: number, email: EmailAddress) => html`
   <a
-    href="/members/send-email-verification?email=${sanitizeString(email)}"
+    href="/members/send-email-verification?email=${sanitizeString(email)}&member=${memberNumber}"
   >
     Send Verification Email
   </a>
@@ -89,7 +88,7 @@ const renderEmailAddresses = (viewModel: ViewModel) => {
     <tr>
       <td></td>
       <td>${sanitizeString(email.emailAddress)}${O.isSome(email.verifiedAt) ? html`✅` : html``}</td>
-      <td>${O.isSome(email.verifiedAt) ? setPrimaryEmail(email.emailAddress): sendVerifyEmail(email.emailAddress)}</td>
+      <td>${O.isSome(email.verifiedAt) ? setPrimaryEmail(email.emailAddress): sendVerifyEmail(viewModel.member.memberNumber, email.emailAddress)}</td>
     </tr>
     `;
   };

src/queries/me/render.ts

@@ -6,7 +6,6 @@ import {Route, get} from './types/route';
 import {authRoutes} from './authentication';
 import {queryToHandler, commandToHandlers, ping} from './http';
 import {emailHandler} from './http/email-handler';
-import {sendEmailVerificationRoutes} from './commands/members/send-email-verification-route';
 
 export const initRoutes = (
   deps: Dependencies,
@@ -84,7 +83,11 @@ export const initRoutes = (
       'sign-owner-agreement',
       commands.members.signOwnerAgreement
     ),
-    ...sendEmailVerificationRoutes(deps, conf),
+    ...command(
+      'members',
+      'send-email-verification',
+      commands.members.sendEmailVerification
+    ),
     ...command(
       'members',
       'rejoined-with-new',