From 109afe5eafa3f629b939dbbad1b3fdebe9c90768 Mon Sep 17 00:00:00 2001
From: TMA <tma+hs@jikos.cz>
Date: Sun, 15 Mar 2026 01:34:20 +0100
Subject: [PATCH] foo too

---
 src/brmelect.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/brmelect.scm b/src/brmelect.scm
index 669c34b..05b4678 100644
--- a/src/brmelect.scm
+++ b/src/brmelect.scm
@@ -152,8 +152,8 @@
     "FOO"
     `@div{
        @,(resource-context-method (current-resource-context))
-       @p{Foo successfully frobnicated for meeting @,(number->string id).}
-       @a[(href @,(string-append "/admin/meeting/" (number->string id)))]{Back to Meeting}
+       @p{Foo successfully frobnicated for meeting @,(identity id).}
+       @a[(href @,(string-append "/admin/meeting/" id))]{Back to Meeting}
      })))
 
 ;; Returns (possibly cached) SQLite3 DB handle