change structure

src/dune

 (executable
  (name server)
- (modules assets server pages template)
+ (modules content server template)
  (libraries dream omd))
 
 (rule
@@ -10,19 +10,10 @@
   (run dream_eml %{deps} --workspace %{workspace_root})))
 
 (rule
- (target assets.ml)
+ (target content.ml)
  (deps
-  (source_tree assets))
+  (source_tree content))
  (action
   (with-stdout-to
    %{null}
-   (run ocaml-crunch -m plain assets -o %{target}))))
-
-(rule
- (target pages.ml)
- (deps
-  (source_tree pages))
- (action
-  (with-stdout-to
-   %{null}
-   (run ocaml-crunch -m plain pages -o %{target}))))
+   (run ocaml-crunch -m plain content -o %{target}))))

src/server.ml

@@ -2,12 +2,12 @@ let render ~lang ~title ~content =
   Template.render_unsafe ~lang ~title ~content:(Dream.html_escape content)
 
 let asset_loader _root path _request =
-  match Assets.read path with
+  match Content.read ("assets/" ^ path) with
   | None -> Dream.empty `Not_Found
   | Some asset -> Dream.respond asset
 
 let page path =
-  match Pages.read (path ^ ".md") with
+  match Content.read (path ^ ".md") with
   | None -> None
   | Some page -> Some (Omd.of_string page |> Omd.to_html)