#######
#
# E-scripts on mastodon.
#
# Note 1: use the eev command (defined in eev.el) and the
# ee alias (in my .zshrc) to execute parts of this file.
# Executing this file as a whole makes no sense.
# An introduction to eev can be found here:
#
#   (find-eev-quick-intro)
#   http://anggtwu.net/eev-intros/find-eev-quick-intro.html
#
# Note 2: be VERY careful and make sure you understand what
# you're doing.
#
# Note 3: If you use a shell other than zsh things like |&
# and the for loops may not work.
#
# Note 4: I always run as root.
#
# Note 5: some parts are too old and don't work anymore. Some
# never worked.
#
# Note 6: the definitions for the find-xxxfile commands are on my
# .emacs.
#
# Note 7: if you see a strange command check my .zshrc -- it may
# be defined there as a function or an alias.
#
# Note 8: the sections without dates are always older than the
# sections with dates.
#
# This file is at <http://anggtwu.net/e/mastodon.e>
#           or at <http://anggtwu.net/e/mastodon.e.html>.
#        See also <http://anggtwu.net/emacs.html>,
#                 <http://anggtwu.net/.emacs[.html]>,
#                 <http://anggtwu.net/.zshrc[.html]>,
#                 <http://anggtwu.net/escripts.html>,
#             and <http://anggtwu.net/>.
#
#######



https://emacs.social/notifications

mastodon-active-user
mastodon-instance-url

Username of the active user.
For example, if your username is
"example_user@social.instance.org", and you want this account
to be active, the value of this variable should be
"example_user".

Also for completeness, the value of ‘mastodon-instance-url’
should be "https://social.instance.org".



# (find-epackage-links 'mastodon "mastodon" t)
# (code-c-d "mastodon" "~/.emacs.d/elpa/mastodon-2.0.0/")
# (find-mastodonfile "")


(find-eev "eepitch.el" "wait-for-hooks")



Do you know how to make Slime use the current window? On Sly I had to
do this, but when I wrote that I didn't know how to use advice...

(find-eev "eepitch.el" "wait-for-hooks")


;; (find-elocus-links "RET" 'mastodon-mode-map "mastodon-tl-thread")
(mastodon-tl--property 'base-item-id :no-move)
(mastodon-tl--thread-do "114419823668225061")
(mastodon-profile-show-user "eduardoochs")

(plist-get mastodon-tl--buffer-spec thread-item-id)


(account ("eduardoochs" . "https://emacs.social/")
 buffer-name "*mastodon-toot-114419823668225061*"
 endpoint "statuses/114419823668225061"
 update-function mastodon-tl--update-toot
 link-header nil
 update-params nil
 hide-replies nil
 max-id nil
 thread-item-id "114419823668225061")

(account ("eduardoochs" . "https://emacs.social/")
 buffer-name "*mastodon-eduardoochs-statuses*"
 endpoint "accounts/114401593586905552/statuses"
 update-function mastodon-tl--timeline
 link-header nil
 update-params (("limit" . "20") nil)
 hide-replies nil
 max-id nil
 thread-item-id nil)






#  Local Variables:
#  coding:               utf-8-unix
#  End: