feat: add agenda validation before summarizing a meeting

bakaburg1 · Apr 16, 2024 · 6bdabad · 6bdabad
1 parent 99168d4
commit 6bdabad
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/summarization.R b/R/summarization.R
@@ -358,6 +358,10 @@ summarise_full_meeting <- function(
     ...
 ) {
 
+  if (!validate_agenda(agenda)) {
+    stop("The agenda is not valid.")
+  }
+
   # Import agenda from file
   if (is.character(agenda)) {
     agenda <- dget(agenda)