aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-02-20 19:42:17 +0100
committermarty hiatt <martianhiatus@riseup.net>2024-02-20 19:42:17 +0100
commit63120440fa0e7c981c22d687a778b5143fc18639 (patch)
tree1b255dfca0dc2678d963dfb48f00eff5a828fe2b /lisp
parent58ec54b6663c82da6ec87c6f3d1016db4442d3dc (diff)
string-trim-left on remove-docs
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-toot.el3
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."