fix again

This commit is contained in:
TMA 2026-03-15 11:25:21 +01:00
parent 4a92f010f7
commit 5019188ed6

View file

@ -319,7 +319,7 @@ $4"
(when (and present-str (eq? (string=? (if (eq? (vector-ref member-row 3) #f) #t) #t))
(query-db "SELECT brm.sync_vote_present_to_meeting($1, $2, $3)"
member-id meeting-id (if present-str #t #f))))))
all-member-rows)))
all-member-rows))))
(make-html-response
200
(layout
@ -327,10 +327,10 @@ $4"
`@div{
@p{Members status updated successfully for vote @,(identity id).}
@a[(href @,(string-append "/admin/vote/" id))]{Back to Vote}
}))))
})))
(make-error-response
405 "The access method used to request the document is not supported."
#:headers '(("Allow" . "POST"))) ))
#:headers '(("Allow" . "POST")))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; /admin/vote/:id/end
@ -345,10 +345,10 @@ $4"
`@div{
@p{Vote @,(identity id) has been ended successfully.}
@a[(href @,(string-append "/admin/vote/" id))]{Back to Vote}
}))))
})))
(make-error-response
405 "The access method used to request the document is not supported."
#:headers '(("Allow" . "POST"))))
#:headers '(("Allow" . "POST")))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; /foo -- debug endpoint