From 54263c53842c8d68e587e5b5d79e14681698b00b Mon Sep 17 00:00:00 2001 From: Johnson Denen Date: Fri, 7 Apr 2017 09:33:39 -0400 Subject: Restructure under lisp directory --- lisp/mastodon.el | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 lisp/mastodon.el (limited to 'lisp/mastodon.el') diff --git a/lisp/mastodon.el b/lisp/mastodon.el new file mode 100644 index 0000000..b3946f8 --- /dev/null +++ b/lisp/mastodon.el @@ -0,0 +1,23 @@ +(load-file "mastodon-auth.el") +(load-file "mastodon-http.el") + +(defvar mastodon--api-version "v1") + +(defcustom mastodon-instance-url "https://mastodon.social" + "Base URL for the Masto instance from which you toot." + :group 'mastodon + :type 'string) + +;; TODO +(defcustom mastodon-token-file (concat user-emacs-directory "mastodon.plstore") + "File path where Mastodon access tokens are stored." + :group 'mastodon + :type 'file) + +(defvar mastodon--client-plist (mastodon--read-access-token-file) + "Stores CLIENT_ID, CLIENT_SECRET, and ACCESS_TOKEN. + +Reads values from `mastodon-token-file' if they exist.") + +(defvar mastodon--token (mastodon--read-or-get-access-token) + "API token for Mastodon.") -- cgit v1.2.3