diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-05 11:40:22 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-05 11:40:22 +0200 |
| commit | bf656bd333804622798577c6208c2648bf4ed353 (patch) | |
| tree | 6c44a2b62d934aecaa045426d7df8043443480f8 /lisp/mastodon-toot.el | |
| parent | d39903ddccdbdc8b6cb66173ab540eb6703e709c (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/mastodon-toot.el')
| -rw-r--r-- | lisp/mastodon-toot.el | 8 |
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. |