From 6d80f5b2d2dd71a0e28a7bcb700e8fb1757ac8d6 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Sat, 14 Oct 2023 19:46:41 +0200 Subject: minor-view fixme --- lisp/mastodon-views.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'lisp/mastodon-views.el') diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index 20734ae..d7fedb6 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -164,9 +164,12 @@ request. This function is used as the update-function to `mastodon-tl--init-sync', which initializes a buffer for us and provides the JSON data." - ;; FIXME: this breaks pagination, duh! - (erase-buffer) - (mastodon-search--insert-heading view-name) ; this cd go in init-sync + ;; FIXME: this is not an update function as it inserts a heading and + ;; possible bindings string + ;; either it should go in init-sync, or possibly in each view function + ;; but either way, this function does almost nothing for us. + ;; could we call init-sync in here pehaps? + (mastodon-search--insert-heading view-name) (when bindings-string (insert (mastodon-tl--set-face (concat "[" bindings-string "]\n\n") 'font-lock-comment-face))) -- cgit v1.2.3