From 86c6f37546004cc19095f2e0d1ba76eae9570804 Mon Sep 17 00:00:00 2001 From: Ben Croker <57572400+bencroker@users.noreply.github.com> Date: Fri, 27 Mar 2026 11:59:33 -0600 Subject: [PATCH] Handle DELETE method in `ReadSignals` --- src/Hypermedia/Datastar/WAI.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/Hypermedia/Datastar/WAI.hs b/src/Hypermedia/Datastar/WAI.hs index b34fee0..2bb16d1 100644 --- a/src/Hypermedia/Datastar/WAI.hs +++ b/src/Hypermedia/Datastar/WAI.hs @@ -152,8 +152,9 @@ handler req = do -} readSignals :: (FromJSON a) => WAI.Request -> IO (Either String a) readSignals req - | WAI.requestMethod req == "GET" = - pure $ parseFromQuery req + | WAI.requestMethod req == "GET" + || WAI.requestMethod req == "DELETE" = + pure $ parseFromQuery req | otherwise = parseFromBody req