diff options
| -rw-r--r-- | example/lazybones-test.lisp | 6 |
1 files 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")) |