diff --git a/README.txt b/README.txt index fa85ab0..607e959 100644 --- a/README.txt +++ b/README.txt @@ -5,7 +5,7 @@ CL-IPFS-API² :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 installed go-ipfs program). -It uses Dexador, YASON, and UIOP. +It uses Drakma, YASON, and UIOP. ———————————————————————————————————————— diff --git a/main.lisp b/main.lisp index 2ea88c7..98f2a14 100644 --- a/main.lisp +++ b/main.lisp @@ -491,13 +491,13 @@ (defun files-rm (path &key (recursive nil) (force nil)) "Remove a given file. /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)))) ;; STRING → ALIST || (NIL STRING) (defun files-stat (path) - "Remove a given file. - /ipns/docs.ipfs.io/reference/api/http/#api-v0-files-rm" + "Get file status. + /ipns/docs.ipfs.io/reference/api/http/#api-v0-files-stat" (ipfs-call "files/stat" `(("arg" ,path)))) ;; PATHNAME STRING [:NUMBER :BOOLEAN :BOOLEAN :BOOLEAN :NUMBER :BOOLEAN