diff --git a/schedule.qmd b/schedule.qmd
index 2df421b8..ac6520c2 100644
--- a/schedule.qmd
+++ b/schedule.qmd
@@ -186,6 +186,15 @@ timetable = tt_csv |>
session_code,
""
),
+ Slides = case_when(
+ session_code %in% c("s1", "s2", "s3", "s6") ~ paste0("Slides"),
+ TRUE ~ ""
+ ),
+ Practical = case_when(
+ session_code %in% c("s1", "s2", "s3", "s4", "s5", "s6", "sem1", "sem2") ~ paste0("Practical"),
+ session_code %in% c("d1", "d2", "d3") ~ paste0("Assessment"),
+ TRUE ~ ""
+ ),
Description = description,
Time = format(as.POSIXct(time), "%Y-%m-%d %H:%M"),
Duration = duration,