Make a responsibility more explicit in the analytics shared component…

… #3329

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

@@ -63,10 +63,6 @@ const renderTagManagerNoScript = (tagManagerId: string) => `
   <!-- End Google Tag Manager (noscript) -->
 `;
 
-const renderFathomScript = (fathomId: string) => `
-  <script src="https://cdn.usefathom.com/script.js" data-site="${fathomId}" defer data-cookieconsent="ignore"></script>
-`;
-
 export const googleTagManager = (userId: O.Option<UserId>): HtmlFragment => pipe(
   process.env.GOOGLE_TAG_MANAGER_ID,
   O.fromNullable,
@@ -86,13 +82,3 @@ export const googleTagManagerNoScript = (): HtmlFragment => pipe(
   ),
   toHtmlFragment,
 );
-
-export const fathom = (): HtmlFragment => pipe(
-  process.env.FATHOM_SITE_ID,
-  O.fromNullable,
-  O.match(
-    constant(''),
-    renderFathomScript,
-  ),
-  toHtmlFragment,
-);

src/read-side/html-pages/shared-components/analytics/fathom.ts

@@ -0,0 +1,17 @@
+import * as O from 'fp-ts/Option';
+import { constant, pipe } from 'fp-ts/function';
+import { HtmlFragment, toHtmlFragment } from '../../../../types/html-fragment';
+
+const renderFathomScript = (fathomId: string) => `
+  <script src="https://cdn.usefathom.com/script.js" data-site="${fathomId}" defer data-cookieconsent="ignore"></script>
+`;
+
+export const fathom = (): HtmlFragment => pipe(
+  process.env.FATHOM_SITE_ID,
+  O.fromNullable,
+  O.match(
+    constant(''),
+    renderFathomScript,
+  ),
+  toHtmlFragment,
+);

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

@@ -1 +1,2 @@
-export { fathom, googleTagManager, googleTagManagerNoScript } from './analytics';
+export { googleTagManager, googleTagManagerNoScript } from './analytics';
+export { fathom } from './fathom';