hiro/lack
1
0
Fork 0
mirror of https://github.com/vale981/lack synced 2025-03-04 08:51:41 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix the style warnings and an error of generate-env in Lack.Test.

Browse source
This commit is contained in:
Eitaro Fukamachi 2019-08-29 16:21:08 +09:00
parent 69512a4867
commit 0bb74d0610
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/test.lisp
View file

@ -29,7 +29,9 @@
Argument `uri' can be just a path or a full url with scheme and optional port."
(let* ((uri (quri:uri uri))
(path (quri:url-decode (quri:uri-path uri) :lenient t))
(path (if (quri:uri-path uri)
(quri:url-decode (quri:uri-path uri) :lenient t)
"/"))
(query (quri:uri-query uri))
(host (or (quri:uri-host uri)
"localhost"))
@ -112,7 +114,6 @@
(defun request (uri &rest args &key (method :get) content headers cookie-jar
(max-redirects 5))
(declare (ignore method content headers))
(let ((env (generate-env uri
:method method :content content :headers headers
:cookie-jar cookie-jar))