feat: show JSON status on HTML report front page — radicle-ci-broker

Also, prettify the JSON.

Signed-off-by: Lars Wirzenius liw@liw.fi

         doc.push_to_body(
             &Element::new(Tag::P)
                 .with_text("Last updated: ")
                 .with_text(&self.timestamp),
         );
         doc.push_to_body(
             &Element::new(Tag::P)
                 .with_text(&self.timestamp)
                 .with_child(Element::new(Tag::Br))
                 .with_text("CI broker version: ")
                 .with_text(self.ci_broker_version)
                 .with_text(" (commit ")

                 .with_text(")"),
         );
         let status = StatusData::from(self).as_json();
         doc.push_to_body(
             &Element::new(Tag::P).with_child(
                 Element::new(Tag::A)
                     .with_attribute("href", "status.json")
                     .with_text("status.json:"),
             ),
         );
         doc.push_to_body(
             &Element::new(Tag::Blockquote).with_child(Element::new(Tag::Pre).with_text(&status)),
         );
         doc.push_to_body(&Element::new(Tag::H2).with_text("Repositories"));
         doc.push_to_body(&Element::new(Tag::P).with_text("Latest CI run for each repository."));

         // contention.
         let status = {
             let data = self.lock();
             serde_json::to_string(&StatusData::from(&*data)).unwrap()
             StatusData::from(&*data).as_json()
         };
         write(filename, status).unwrap();

     latest_ci_run: Option<Run>,
 }
 impl StatusData {
     fn as_json(&self) -> String {
         serde_json::to_string_pretty(self).unwrap()
     }
 }
 impl From<&PageData> for StatusData {
     fn from(page: &PageData) -> Self {
         Self {