aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-09-16 08:54:11 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-09-16 08:54:11 +0200
commit4a6200be2e98b68e0869400ae21f89f2c1fa618a (patch)
treed57856bba6ed6f6957d6ebacee0eb9f96e203991 /lisp
parent3ca71c2e85b6c327c77efcd0b089408b9ff53221 (diff)
filter lists like "home". FIX #575.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-tl.el2
-rw-r--r--lisp/mastodon-views.el1
2 files changed, 3 insertions, 0 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 3e488f0..0e98015 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1608,6 +1608,8 @@ Returns a member of `mastodon-views--filter-types'."
"public")
((mastodon-tl--profile-buffer-p)
"profile")
+ ((eq buf 'list-timeline)
+ "home") ;; lists are "home" filter
(t ;; thread, notifs, home:
(symbol-name buf)))))
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el
index 989a614..ac62b1f 100644
--- a/lisp/mastodon-views.el
+++ b/lisp/mastodon-views.el
@@ -690,6 +690,7 @@ Optionally, provide ID, TITLE, CONTEXT, TYPE, and TERMS to update a filter."
(warn-or-hide
(or type (completing-read "Warn (like CW) or hide? "
'("warn" "hide") nil :match)))
+ ;; TODO: display "home (and lists)" but just use "home" for API
(contexts
(or context (completing-read-multiple
"Filter contexts [TAB for options, comma separated]: "