From 0833f316144d5a8097c37b944b709ec20aa0f046 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sat, 12 Feb 2022 14:50:35 -0600 Subject: formatting and comments in example --- example/lazybones-test.lisp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/example/lazybones-test.lisp b/example/lazybones-test.lisp index aca7a56..9300467 100644 --- a/example/lazybones-test.lisp +++ b/example/lazybones-test.lisp @@ -68,7 +68,8 @@ "Echos back Hello WHO" (http-ok (format nil "Hello ~a~%" who))) ; use the route variable here -(defendpoint* :post "/hello/:who:" () (:auth t) ; use the default authorizor for the app +(defendpoint* :post "/hello/:who:" () + (:auth t) ; use the app's default authorizor "Echo's back 'Hello WHO, I got your message BODY' where BODY is the post body." (print (lzb:request-header :content-type)) (let ((body (lzb:request-body))) @@ -97,7 +98,8 @@ "Randomly decides that the request is authorized" (< 5 (random 10))) -(defendpoint* :post "/crapshoot" () (:auth 'crapshoot-authorizer) ; use custom authorizer +(defendpoint* :post "/crapshoot" () + (:auth 'crapshoot-authorizer) ; use a custom authorizer "Echos back 'You made it' if the request was authorized" (http-ok "You made it")) -- cgit v1.2.3