diff options
Diffstat (limited to 'lisp/jsonrpc.el')
| -rw-r--r-- | lisp/jsonrpc.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el index 85fd40ecd26..41cd84627be 100644 --- a/lisp/jsonrpc.el +++ b/lisp/jsonrpc.el @@ -107,7 +107,7 @@ notifications. CONN, METHOD and PARAMS are the same as in ;;; API mandatory (cl-defgeneric jsonrpc-connection-send (conn &key id method params result error) "Send a JSONRPC message to connection CONN. -ID, METHOD, PARAMS, RESULT and ERROR. ") +ID, METHOD, PARAMS, RESULT and ERROR.") ;;; API optional (cl-defgeneric jsonrpc-shutdown (conn) @@ -343,7 +343,7 @@ ignored." :documentation "Process object wrapped by the this connection.") (-expected-bytes :accessor jsonrpc--expected-bytes - :documentation "How many bytes declared by server") + :documentation "How many bytes declared by server.") (-on-shutdown :accessor jsonrpc--on-shutdown :initform #'ignore @@ -416,13 +416,13 @@ connection object, called when the process dies .") (cl-defmethod jsonrpc-shutdown ((conn jsonrpc-process-connection) &optional cleanup) "Wait for JSONRPC connection CONN to shutdown. -With optional CLEANUP, kill any associated buffers. " +With optional CLEANUP, kill any associated buffers." (unwind-protect (cl-loop with proc = (jsonrpc--process conn) for i from 0 while (not (process-get proc 'jsonrpc-sentinel-cleanup-started)) unless (zerop i) do - (jsonrpc--warn "Sentinel for %s still hasn't run, deleting it!" proc) + (jsonrpc--warn "Sentinel for %s still hasn't run, deleting it!" proc) do (delete-process proc) (accept-process-output nil 0.1)) @@ -574,8 +574,8 @@ With optional CLEANUP, kill any associated buffers. " (deferred nil)) "Does actual work for `jsonrpc-async-request'. -Return a list (ID TIMER). ID is the new request's ID, or nil if -the request was deferred. TIMER is a timer object set (or nil, if +Return a list (ID TIMER). ID is the new request's ID, or nil if +the request was deferred. TIMER is a timer object set (or nil, if TIMEOUT is nil)." (pcase-let* ((buf (current-buffer)) (point (point)) (`(,_ ,timer ,old-id) |