diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 11:49:06 +0100 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 11:49:06 +0100 |
commit | bb3b126c0850a109d8a6aed94c6376c23343a7c1 (patch) | |
tree | 635380b829172db7b914e3407640f80306c5fdfa | |
parent | 3a621f25b58e6426e00690b9157fe6212851feab (diff) |
cull unused, and now unneeded, --has-toots-p fun
-rw-r--r-- | lisp/mastodon-tl.el | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 124d635..a9e2353 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -1517,19 +1517,6 @@ call this function after it is set or use something else." This includes the update profile note buffer, but not the preferences one." (string-prefix-p "accounts" (mastodon-tl--get-endpoint nil :no-error))) -(defun mastodon-tl--has-toots-p () - "Return non-nil if the current buffer contains toots. -Return value is that of `member'. -This is used to avoid running into trouble using functions that -presume we are in a timeline of toots or similar elements, such as -`mastodon-tl--property'." - (let ((toot-buffers - '(home federated local tag-timeline notifications - thread profile-statuses search trending-tags bookmarks - favourites))) - ;; profile-followers profile following - (member (mastodon-tl--get-buffer-type) toot-buffers))) - (defun mastodon-tl--timeline-proper-p () "Return non-nil if the current buffer is a 'proper' timeline. A proper timeline excludes notifications, threads, and other toot |