From eaf2bfcf569e5c789f0207d051e6f2263b38127f Mon Sep 17 00:00:00 2001
From: Matthew Fennell <matthew@fennell.dev>
Date: Tue, 19 May 2026 20:10:51 +0100
Subject: Add sun? helper

---
 util.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/util.scm b/util.scm
index ca58b0f..c3e703f 100644
--- a/util.scm
+++ b/util.scm
@@ -157,3 +157,6 @@
 
 (define (sat? booking)
   (eq? ((compose date->day-name booking-start) booking) 'sat))
+
+(define (sun? booking)
+  (eq? ((compose date->day-name booking-start) booking) 'sun))
-- 
cgit v1.2.3