jadedctrl/ cl-ipfs-api2
1
0
Disbranĉigi 0
Fontkodo Issues 6 Tirpetoj 1 Activity

Ensure ipfs-call URL is a 'character string and not a base-string. 

Otherwise it breaks PURI.
This commit is contained in:
Pierre Neidhardt 2022-09-23 10:23:59 +02:00
parent cc65064550
commit a52676d5c3
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cl-ipfs-api2.asd
View File

@ -3,6 +3,6 @@
:license "LGPLv3" :license "LGPLv3"
:author "Jaidyn Ann <jadedctrl@teknik.io>" :author "Jaidyn Ann <jadedctrl@teknik.io>"
:description "Bindings for the IPFS HTTP API." :description "Bindings for the IPFS HTTP API."
:depends-on (:drakma :yason :arnesi :uiop) :depends-on (:alexandria :drakma :yason :arnesi :uiop)
:components ((:file "package") :components ((:file "package")
(:file "main"))) (:file "main")))

4
main.lisp
View File

@ -32,7 +32,9 @@
(let ((result (let ((result
(multiple-value-list (multiple-value-list
(drakma:http-request (drakma:http-request
(make-call-url call arguments) ;; We ensure the string is of 'character elements and not 'base-char
;; which would break Puri.
(alexandria:copy-array (make-call-url call arguments) :element-type 'character)
:method method :method method
:url-encoder #'ipfs::url-encode :url-encoder #'ipfs::url-encode
:parameters parameters :parameters parameters