Separate a responsibility within the head shared component #3229

src/read-side/html-pages/shared-components/head/client-classification.ts

@@ -0,0 +1,3 @@
+export type ClientClassification = {
+  userAgent: string | undefined,
+};

src/read-side/html-pages/shared-components/head/head.ts

@@ -1,15 +1,12 @@
 import { htmlEscape } from 'escape-goat';
 import * as O from 'fp-ts/Option';
 import { pipe } from 'fp-ts/function';
+import { ClientClassification } from './client-classification';
 import { fathom, googleTagManager } from '../../../../shared-components/analytics';
 import { HtmlFragment, toHtmlFragment } from '../../../../types/html-fragment';
 import { UserId } from '../../../../types/user-id';
 import { HtmlPageHead } from '../../html-page';
 
-export type ClientClassification = {
-  userAgent: string | undefined,
-};
-
 export type DynamicHeadViewModel = HtmlPageHead & {
   clientClassification: ClientClassification,
 };

src/read-side/html-pages/shared-components/head/index.ts

@@ -1 +1,2 @@
-export { ClientClassification, DynamicHeadViewModel, head } from './head';
+export { DynamicHeadViewModel, head } from './head';
+export { ClientClassification } from './client-classification';