diff options
author | marty hiatt <martianhiatus@riseup.net> | 2024-02-20 19:42:17 +0100 |
---|---|---|
committer | marty hiatt <martianhiatus@riseup.net> | 2024-02-20 19:42:17 +0100 |
commit | 63120440fa0e7c981c22d687a778b5143fc18639 (patch) | |
tree | 1b255dfca0dc2678d963dfb48f00eff5a828fe2b | |
parent | 58ec54b6663c82da6ec87c6f3d1016db4442d3dc (diff) |
string-trim-left on remove-docs
-rw-r--r-- | lisp/mastodon-toot.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index 97949cd..7ff3c34 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -812,7 +812,8 @@ to `emojify-user-emojis', and the emoji data is updated." "Get the body of a toot from the current compose buffer." (let ((header-region (mastodon-tl--find-property-range 'toot-post-header (point-min)))) - (buffer-substring (cdr header-region) (point-max)))) + (string-trim-left + (buffer-substring (cdr header-region) (point-max))))) (defun mastodon-toot--build-poll-params () "Return an alist of parameters for POSTing a poll status." |