aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-10-05 11:40:22 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-10-05 11:40:22 +0200
commitbf656bd333804622798577c6208c2648bf4ed353 (patch)
tree6c44a2b62d934aecaa045426d7df8043443480f8 /lisp
parentd39903ddccdbdc8b6cb66173ab540eb6703e709c (diff)
rear-nonsticky only for \n at end of compose header.
prevents a bug where header can be edited despite read-only, and if header edited, it will be partially posted as toot text.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-toot.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 7478037..62a53cf 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1485,11 +1485,13 @@ REPLY-TEXT is the text of the toot being replied to."
'toot-reply t)
"")
divider
- "\n")
- 'rear-nonsticky t
+ )
'face 'mastodon-toot-docs-face
'read-only "Edit your message below."
- 'toot-post-header t))))
+ 'toot-post-header t)
+ ;; allow us to enter text after read-only header:
+ (propertize "\n"
+ 'rear-nonsticky t))))
(defun mastodon-toot--most-restrictive-visibility (reply-visibility)
"Return REPLY-VISIBILITY or default visibility, whichever is more restrictive.