diff options
Diffstat (limited to 'l/src/config.lisp')
| -rw-r--r-- | l/src/config.lisp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/l/src/config.lisp b/l/src/config.lisp index 86b77d3..6b31dac 100644 --- a/l/src/config.lisp +++ b/l/src/config.lisp @@ -14,3 +14,9 @@ :initform nil :reader reload-current-tab :documentation "True if the current tab should be reloaded"))) + +(defmethod print-object ((object config) stream) + (print-unreadable-object (object stream :type t) + (with-slots (socket-url extension-ids reload-current-tab) object + (format stream ":socket-url ~s :extension-ids ~s :reload-current-tab ~s" + socket-url extension-ids reload-current-tab)))) |