From 0cf929a875a6ce448cbca34be553ff206deee82d Mon Sep 17 00:00:00 2001
From: TMA <tma+hs@jikos.cz>
Date: Sun, 15 Mar 2026 02:12:29 +0100
Subject: [PATCH] asdf

---
 src/brmelect.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/brmelect.scm b/src/brmelect.scm
index d5404b9..c0e3a4a 100644
--- a/src/brmelect.scm
+++ b/src/brmelect.scm
@@ -180,7 +180,7 @@ ORDER BY vote_id" id)))
 ;; /admin/meeting/:id/vote
 (define-resource (create-meeting-vote "admin" "meeting" id "vote" params)
   (if (string=? (resource-context-method (current-resource-context)) "POST")
-      (let ((title (param params 'vote-title)))
+      (let ((title (param params "vote-title")))
         (query-db "SELECT brm.create_vote_and_init_status($1, $2)" id title)
         (make-html-response
          200