aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-tl.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-01-28 09:17:48 +0100
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-01-28 09:17:48 +0100
commit4c276b5757dfef3e8e061811ec9d59ed36d6d8d9 (patch)
treeabed40d4924ad23bb630d014f351f042f72cac9e /lisp/mastodon-tl.el
parentdc33073b2da99375e1b77580f15575db78a405ac (diff)
ignore --hide-replies on profile-statuses view
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r--lisp/mastodon-tl.el15
1 files changed, 9 insertions, 6 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 5133cad..7fe1c02 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1372,12 +1372,15 @@ this just means displaying toot client."
"Display each toot in TOOTS.
This function removes replies if user required."
(mapc 'mastodon-tl--toot
- (if (or ; we were called via --more*:
- (mastodon-tl--get-buffer-property 'hide-replies nil :no-error)
- ;; loading a tl with a prefix arg:
- (mastodon-tl--hide-replies-p current-prefix-arg))
- (cl-remove-if-not #'mastodon-tl--is-reply toots)
- toots))
+ ;; hack to *not* filter replies on profiles:
+ (if (eq (mastodon-tl--get-buffer-type) 'profile-statuses)
+ toots
+ (if (or ; we were called via --more*:
+ (mastodon-tl--get-buffer-property 'hide-replies nil :no-error)
+ ;; loading a tl with a prefix arg:
+ (mastodon-tl--hide-replies-p current-prefix-arg))
+ (cl-remove-if-not #'mastodon-tl--is-reply toots)
+ toots)))
(goto-char (point-min)))
(defun mastodon-tl--get-update-function (&optional buffer)