diff options
Diffstat (limited to 'granolin.lisp')
-rw-r--r-- | granolin.lisp | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/granolin.lisp b/granolin.lisp index 8179a66..3432e07 100644 --- a/granolin.lisp +++ b/granolin.lisp @@ -3,37 +3,3 @@ (in-package #:granolin) -;;; Login https://matrix.org/docs/spec/client_server/r0.5.0#id242 -;;; Media Upload https://matrix.org/docs/spec/client_server/r0.5.0#post-matrix-media-r0-upload - - - -(defclass client () - ((access-token - :reader login - :initarg :login - :initform (error "Clients need an access token.")) - (homeserver - :reader homeserver - :initarg :homeserver - :initform (error "Clients require a homeserver.")) - (rooms - :accessor rooms - :initform nil) - (users - :accessor users - :initform nil))) -;;TODO add things like transaction ids and time points - - -(defmethod initialize-instance :after ((client client) &key) - ;; fetch rooms - ;; fetch users - ;; fetch any other state that might be useful - ) - -;;; Sending Room Messages -(defgeneric send-message (client room msg) - (:documentation "Ends up sending an http request to the client's homeserver")) - - |