[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master d2f95ea44c8 2/4: Jsonrpc: better initforms in jsonrpc-connection
From: |
João Távora |
Subject: |
master d2f95ea44c8 2/4: Jsonrpc: better initforms in jsonrpc-connection |
Date: |
Wed, 13 Dec 2023 19:53:46 -0500 (EST) |
branch: master
commit d2f95ea44c8ea408f5c11d89e40982376ae268cc
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>
Jsonrpc: better initforms in jsonrpc-connection
* lisp/jsonrpc.el (jsonrpc-connection): Better initforms
---
lisp/jsonrpc.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index f7ccc8d2745..67243fd49e3 100644
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -51,6 +51,7 @@
(defclass jsonrpc-connection ()
((name
:accessor jsonrpc-name
+ :initform "anonymous"
:initarg :name
:documentation "A name for the connection")
(-request-dispatcher
@@ -76,6 +77,7 @@
:accessor jsonrpc--events-buffer
:documentation "A buffer pretty-printing the JSONRPC events")
(-events-buffer-scrollback-size
+ :initform nil
:initarg :events-buffer-scrollback-size
:accessor jsonrpc--events-buffer-scrollback-size
:documentation "Max size of events buffer. 0 disables, nil means
infinite.")