Allow pingable to be set via an initarg

dtqec · Dec 3, 2023 · 0e94361 · 0e94361
1 parent 7112933
commit 0e94361
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/node.lisp b/src/node.lisp
@@ -52,6 +52,7 @@
    (pingable
     :accessor blossom-node-pingable
     :initform ':ALL
+    :initarg :pingable
     :type ping-type
     :documentation "Used by message handler guards to determine whether this process is currently servicing PING requests. SOFT-PINGs are serviced when set to :SOFT or :ALL, PINGs are serviced when set to :ALL, nothing is serviced when set to :NONE.")
    (wilting