aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJoão Távora2020-05-02 00:10:51 +0100
committerJoão Távora2020-05-02 00:11:18 +0100
commit2ea1265f55d722d83fcae6ea087d059113cf6679 (patch)
tree8d77eaf764f3e7d360ce304dc5eede3010d75b94
parentc59e878439833d89998e03134ee9060f9c449fd9 (diff)
downloademacs-2ea1265f55d722d83fcae6ea087d059113cf6679.tar.gz
emacs-2ea1265f55d722d83fcae6ea087d059113cf6679.zip
Properly fix embarassing missing paren typo in jsonrpc.el
Paul Eggert had fixed it in practice, but the missing paren was meant to close a previous with-current-buffer. * lisp/jsonrpc.el (initialize-instance): Put parenthesis in right spot. (Version): Bump to 1.0.11
-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