aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/jsonrpc.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index 696a2daa286..6cf41311a14 100644
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -5,7 +5,7 @@
5;; Author: João Távora <joaotavora@gmail.com> 5;; Author: João Távora <joaotavora@gmail.com>
6;; Keywords: processes, languages, extensions 6;; Keywords: processes, languages, extensions
7;; Package-Requires: ((emacs "25.2")) 7;; Package-Requires: ((emacs "25.2"))
8;; Version: 1.0.10 8;; Version: 1.0.11
9 9
10;; This is an Elpa :core package. Don't use functionality that is not 10;; This is an Elpa :core package. Don't use functionality that is not
11;; compatible with Emacs 25.2. 11;; compatible with Emacs 25.2.
@@ -398,7 +398,7 @@ connection object, called when the process dies .")
398 (ignore-errors (kill-buffer hidden-name)) 398 (ignore-errors (kill-buffer hidden-name))
399 (rename-buffer hidden-name) 399 (rename-buffer hidden-name)
400 (process-put proc 'jsonrpc-stderr (current-buffer)) 400 (process-put proc 'jsonrpc-stderr (current-buffer))
401 (read-only-mode t)) 401 (read-only-mode t)))
402 (setf (jsonrpc--process conn) proc) 402 (setf (jsonrpc--process conn) proc)
403 (set-process-buffer proc (get-buffer-create (format " *%s output*" name))) 403 (set-process-buffer proc (get-buffer-create (format " *%s output*" name)))
404 (set-process-filter proc #'jsonrpc--process-filter) 404 (set-process-filter proc #'jsonrpc--process-filter)
@@ -407,7 +407,7 @@ connection object, called when the process dies .")
407 (buffer-disable-undo) 407 (buffer-disable-undo)
408 (set-marker (process-mark proc) (point-min)) 408 (set-marker (process-mark proc) (point-min))
409 (let ((inhibit-read-only t)) (erase-buffer) (read-only-mode t))) 409 (let ((inhibit-read-only t)) (erase-buffer) (read-only-mode t)))
410 (process-put proc 'jsonrpc-connection conn)))) 410 (process-put proc 'jsonrpc-connection conn)))
411 411
412(cl-defmethod jsonrpc-connection-send ((connection jsonrpc-process-connection) 412(cl-defmethod jsonrpc-connection-send ((connection jsonrpc-process-connection)
413 &rest args 413 &rest args