1 (** View layer — re-exports layout and page modules. *) 2 3 let error_page = Error.render 4 let root = Root.render 5 6 module Repo = struct 7 type commit_message = Commit_message.t = { summary : string; body : string } 8 9 let context = Repo_view.context 10 let parse_commit_message = Commit_message.parse 11 let parse_conventional = Commit_message.parse_conventional 12 let summary = Repo_view.summary 13 let commits = Repo_view.commits 14 let files = Repo_view.files 15 let file = Repo_view.file 16 let commit = Repo_view.commit 17 end 18