diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-14 19:46:41 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-14 19:46:41 +0200 |
| commit | 6d80f5b2d2dd71a0e28a7bcb700e8fb1757ac8d6 (patch) | |
| tree | 4db4dd13666040419e8e127a0b99720356591bf9 | |
| parent | b078849b534ddaaebdaf45ebee89d2fe59f3f696 (diff) | |
minor-view fixme
| -rw-r--r-- | lisp/mastodon-views.el | 9 |
1 files changed, 6 insertions, 3 deletions
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))) |