Fix formatting of docstring

This commit is contained in:
Lucien Cartier-Tilet 2022-07-13 15:49:50 +02:00
parent 2f712b8a4d
commit ed42053b5c
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA
2 changed files with 16 additions and 13 deletions

4
.dir-locals.el Normal file
View File

@ -0,0 +1,4 @@
;;; Directory Local Variables
;;; For more information see (info "(emacs) Directory Variables")
((emacs-lisp-mode . ((sentence-end-double-space . t))))

View File

@ -78,9 +78,8 @@ in the else branch is the definition of `plistp' in Emacs 29."
(defun appwrite--get-full-url (api)
"Get the full url for API.
If API does not begin with an initial forward slash, add it
automatically.
If it does not contain an API version, prefix \"/v1\" by default."
automatically. If it does not contain an API version, prefix
\"/v1\" by default."
(let ((versionp (string-match-p "^/?v[[:digit:]]+.*" api))
(initial-forward-slash-p (string-prefix-p "/" api)))
(concat appwrite-endpoint
@ -104,8 +103,8 @@ This will show a message in the modeline in this format:
The function considers a call to the API a failure in case the
HTTP status code in RESPONSE differs from SUCCESS-STATUS, the
HTTP status code hoped for. If thats the case, warn the user,
see `appwrite--message-failure'. Else, return the JSON returned
by the API."
see `appwrite--message-failure', else return the JSON returned by
the API."
(let ((status (car response))
(json (cdr response)))
(if (= status success-status)