diff options
| author | João Távora | 2020-05-02 00:10:51 +0100 |
|---|---|---|
| committer | João Távora | 2020-05-02 00:11:18 +0100 |
| commit | 2ea1265f55d722d83fcae6ea087d059113cf6679 (patch) | |
| tree | 8d77eaf764f3e7d360ce304dc5eede3010d75b94 | |
| parent | c59e878439833d89998e03134ee9060f9c449fd9 (diff) | |
| download | emacs-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.el | 6 |
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 |