diff --git a/main.lisp b/main.lisp index b1611fb..6af98af 100644 --- a/main.lisp +++ b/main.lisp @@ -522,8 +522,8 @@ (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) - ("force" ,force)))) + (ipfs-call "files/rm" `(("arg" ,path) ("recursive" ,recursive) + ("force" ,force)))) ;; STRING → ALIST || (NIL STRING) (defun files-stat (path)