diff options
author | Alexander Griffith <griffitaj@gmail.com> | 2018-03-10 12:48:19 -0500 |
---|---|---|
committer | Johnson Denen <johnson.denen@gmail.com> | 2018-08-10 22:20:04 -0400 |
commit | 802725e043e48e453899d45e0110daa4fbbdc981 (patch) | |
tree | 1aaa3f0b6e4279759f04cf7521998c91addbde31 | |
parent | cb37df4cb3ddf8839c3b44db565a18c86e65705c (diff) |
Toggle read-only when inserting thread contents. (#184)
-rw-r--r-- | lisp/mastodon-tl.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 4190c4c..6711351 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -701,10 +701,11 @@ webapp" endpoint ,(format "statuses/%s/context" id) update-function (lambda(toot) (message "END of thread.")))) - (mastodon-tl--timeline (vconcat - (cdr (assoc 'ancestors context)) - `(,toot) - (cdr (assoc 'descendants context))))) + (let ((inhibit-read-only t)) + (mastodon-tl--timeline (vconcat + (cdr (assoc 'ancestors context)) + `(,toot) + (cdr (assoc 'descendants context)))))) (message "No Thread!")))) (defun mastodon-tl--more () |