tests: add new repo fields to tests

Author: yasunariw

test/github_link_test.ml

@@ -11,6 +11,8 @@ let mk_repo ?(scheme = "https") prefix prefix_api : repository =
     url = sprintf "%s://%s/ahrefs/monorepo" scheme prefix;
     commits_url = sprintf "%s://%s/repos/ahrefs/monorepo/commits{/sha}" scheme prefix_api;
     contents_url = sprintf "%s://%s/repos/ahrefs/monorepo/contents/{+path}" scheme prefix_api;
+    pulls_url = sprintf "%s://%s/repos/ahrefs/monorepo/pulls{/number}" scheme prefix_api;
+    issues_url = sprintf "%s://%s/repos/ahrefs/monorepo/issues{/number}" scheme prefix_api;
   }
 
 let enterprise_repo1 = mk_repo "example.org" "example.org/api/v3"

test/test.ml

@@ -42,7 +42,9 @@ let process ~(ctx : Context.t) (kind, path, state_path) =
 
 let () =
   let payloads = get_mock_payloads () in
-  let repo : Github_t.repository = { name = ""; full_name = ""; url = ""; commits_url = ""; contents_url = "" } in
+  let repo : Github_t.repository =
+    { name = ""; full_name = ""; url = ""; commits_url = ""; contents_url = ""; pulls_url = ""; issues_url = "" }
+  in
   let ctx = Context.make ~state_filepath:"state.json" () in
   Lwt_main.run
     ( match%lwt Api_local.Github.get_config ~ctx ~repo with