docs: readme

This commit is contained in:
Orion Kindel
2025-03-01 16:18:48 -06:00
parent e646cf9c08
commit 8fe765a730

View File

@@ -41,7 +41,7 @@ main = launchAff_ do
[ "cheddar", "swiss", "gouda" ] [ "cheddar", "swiss", "gouda" ]
let let
getCheeses :: Get -> Path ("cheeses") _ -> Aff Response getCheeses :: Get -> Path "cheeses" _ -> Aff Response
getCheeses _ _ = liftEffect do getCheeses _ _ = liftEffect do
cheeses' <- Ref.read cheeses cheeses' <- Ref.read cheeses
toResponse $ Status.ok /\ Json cheeses' toResponse $ Status.ok /\ Json cheeses'