diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-06-02 13:21:47 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-06-02 13:21:47 +0200 |
| commit | f4a4d31f29956048f44fb9982788ff17753585de (patch) | |
| tree | 52b9166fc2cc66ae4663f891b8dfc5ddb926d935 /lisp/mastodon.el | |
| parent | 06cbc031c78210a4950a748b20142e0008728bef (diff) | |
| parent | 63a07d2ff4bff73d377ab4931cf0fb1fd7d51146 (diff) | |
Merge branch 'reload-paginate' into develop
Diffstat (limited to 'lisp/mastodon.el')
| -rw-r--r-- | lisp/mastodon.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el index a0b5bbc..490b9fa 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -338,7 +338,7 @@ If REPLY-JSON is the json of the toot being replied to." (mastodon-toot--compose-buffer user reply-to-id reply-json)) ;;;###autoload -(defun mastodon-notifications-get (&optional type buffer-name force) +(defun mastodon-notifications-get (&optional type buffer-name force max-id) "Display NOTIFICATIONS in buffer. Optionally only print notifications of type TYPE, a string. BUFFER-NAME is added to \"*mastodon-\" to create the buffer name. @@ -356,7 +356,9 @@ from the server and load anew." (mastodon-tl--init-sync (or buffer-name "notifications") "notifications" 'mastodon-notifications--timeline - type) + type + (when max-id + `(("max_id" . ,(mastodon-tl--buffer-property 'max-id))))) (with-current-buffer buffer (use-local-map mastodon-notifications--map))))) |