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

Bugfix: files-rm 

- Files-rm is working
- Minor fixes to texts
This commit is contained in:
bnmcgn@gmail.com 2024-05-30 10:22:44 -07:00
parent 13cd1091fd
commit 00d79f4173
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
README.txt
View File

@ -5,7 +5,7 @@ CL-IPFS-API²
:cl-ipfs-api² is a pretty simple set of IPFS bindings for Common Lisp, using :cl-ipfs-api² is a pretty simple set of IPFS bindings for Common Lisp, using
the HTTP API for (almost) everything, except for pubsub (which uses the locally the HTTP API for (almost) everything, except for pubsub (which uses the locally
installed go-ipfs program). installed go-ipfs program).
It uses Dexador, YASON, and UIOP. It uses Drakma, YASON, and UIOP.
———————————————————————————————————————— ————————————————————————————————————————

6
main.lisp
View File

@ -491,13 +491,13 @@
(defun files-rm (path &key (recursive nil) (force nil)) (defun files-rm (path &key (recursive nil) (force nil))
"Remove a given file. "Remove a given file.
/ipns/docs.ipfs.io/reference/api/http/#api-v0-files-rm" /ipns/docs.ipfs.io/reference/api/http/#api-v0-files-rm"
(ipfs-call "files/read" `(("arg" ,source) ("recursive" ,recursive) (ipfs-call "files/rm" `(("arg" ,path) ("recursive" ,recursive)
("force" ,force)))) ("force" ,force))))
;; STRING → ALIST || (NIL STRING) ;; STRING → ALIST || (NIL STRING)
(defun files-stat (path) (defun files-stat (path)
"Remove a given file. "Get file status.
/ipns/docs.ipfs.io/reference/api/http/#api-v0-files-rm" /ipns/docs.ipfs.io/reference/api/http/#api-v0-files-stat"
(ipfs-call "files/stat" `(("arg" ,path)))) (ipfs-call "files/stat" `(("arg" ,path))))
;; PATHNAME STRING [:NUMBER :BOOLEAN :BOOLEAN :BOOLEAN :NUMBER :BOOLEAN ;; PATHNAME STRING [:NUMBER :BOOLEAN :BOOLEAN :BOOLEAN :NUMBER :BOOLEAN