Add EiC info at top of editors page; close #33

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: dashboard
 Title: What the Package Does (One Line, Title Case)
-Version: 0.2.1.004
+Version: 0.2.2
 Authors@R: 
   person(given = "First",
          family = "Last",

codemeta.json

@@ -6,7 +6,7 @@
   "name": "dashboard: What the Package Does (One Line, Title Case)",
   "codeRepository": "https://github.com/ropensci-review-tools/dashboard",
   "license": "https://spdx.org/licenses/MIT",
-  "version": "0.2.1.004",
+  "version": "0.2.2",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",

quarto/editors.qmd

@@ -33,8 +33,27 @@ ed_timeline_total <- ed_dat$timeline_total |>
     dplyr::filter (name %in% ed_status$editor)
 ed_timeline_new <- ed_dat$timeline_new |>
     dplyr::filter (name %in% ed_status$editor)
+eic <- ed_dat$eic
 ```
 
+```{r eic-info, echo = FALSE, results = 'asis'}
+msg <- paste0 (
+    "Current Editor-in-Charge is [",
+    eic$name [1], "](https://github.com/", eic$github [1], ").\n"
+)
+cat (msg)
+cat ("\n")
+if (nrow (eic) > 1L) {
+    msg <- paste0 (
+        "Next Editor-in-Charge (from ", eic$start_date [2],
+        ") will be [",
+        eic$name [2], "](https://github.com/", eic$github [2], ").\n"
+    )
+}
+cat (msg)
+```
+
+
 ## Editor Overview {#editor-overview}
 
 The following interactive table summarises the availability of our editorial