Test signing out

eudoxia0 · Jun 16, 2015 · 594e5a1 · 594e5a1
1 parent ad927cc
commit 594e5a1
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/t/examples.lisp b/t/examples.lisp
@@ -69,6 +69,9 @@
                           :method :post
                           :parameters (list (cons "username" "eudoxia")
                                             (cons "password" "pass"))))
+    ;; Log out
+    (finishes
+     (drakma:http-request (make-url "signout")))
     ;; Bring it down
     (lucerne:stop utweet.views:app)))