Rename a view model property from the point of view of the component #…

…3342

src/read-side/html-pages/search-page/construct-view-model/construct-view-model.ts

@@ -8,7 +8,7 @@ import { Dependencies } from './dependencies';
 import * as DE from '../../../../types/data-error';
 import { ViewModel } from '../view-model';
 
-const constructSearchCategories = (dependencies: Dependencies) => pipe(
+const constructBrowseByCategory = (dependencies: Dependencies) => pipe(
   dependencies.fetchSearchCategories(),
   TE.map(RA.map((title) => ({
     title,
@@ -21,10 +21,9 @@ const constructSearchCategories = (dependencies: Dependencies) => pipe(
 );
 
 export const constructViewModel = (dependencies: Dependencies): TE.TaskEither<DE.DataError, ViewModel> => pipe(
-  constructSearchCategories(dependencies),
-  T.map((categories) => pipe(
-    categories,
-    (componentViewModel) => ({ categories: componentViewModel }),
+  constructBrowseByCategory(dependencies),
+  T.map((browseByCategory) => pipe(
+    ({ browseByCategory }),
     E.right,
   )),
 );

src/read-side/html-pages/search-page/render-as-html/render-page.ts

@@ -6,7 +6,7 @@ import { renderListItems } from '../../shared-components/list-items';
 import { renderSearchForm } from '../../shared-components/search-form';
 import { ViewModel } from '../view-model';
 
-const renderSearchCategories = (viewModel: ViewModel['categories']) => pipe(
+const renderSearchCategories = (viewModel: ViewModel['browseByCategory']) => pipe(
   viewModel,
   O.match(
     () => '',
@@ -32,7 +32,7 @@ export const renderPage = (viewModel: ViewModel): HtmlFragment => pipe(
       <h1>Search Sciety</h1>
     </header>
     ${renderSearchForm('', true)}
-    ${renderSearchCategories(viewModel.categories)}
+    ${renderSearchCategories(viewModel.browseByCategory)}
   `,
   toHtmlFragment,
 );

src/read-side/html-pages/search-page/view-model.ts

@@ -5,4 +5,4 @@ type Category = {
   href: string,
 };
 
-export type ViewModel = { categories: O.Option<ReadonlyArray<Category>> };
+export type ViewModel = { browseByCategory: O.Option<ReadonlyArray<Category>> };