From 7d5506e5f6f25570aa71bd4fa4f32aaef9c68a5f Mon Sep 17 00:00:00 2001 From: Boutade Date: Mon, 23 Sep 2019 09:59:53 -0500 Subject: nilnitial commit --- granolin.lisp | 34 ---------------------------------- 1 file changed, 34 deletions(-) (limited to 'granolin.lisp') 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")) - - -- cgit v1.2.3