diff options
author | clarkenciel <clarkenciel@gmail.com> | 2017-04-28 10:52:32 -0700 |
---|---|---|
committer | Johnson Denen <johnson.denen@gmail.com> | 2017-04-28 14:48:54 -0400 |
commit | 66d54dff2e5b4493117c9c0074b07bba25844cc6 (patch) | |
tree | dc0b7cc77a50b5da7f1da5053806de7f21803296 | |
parent | 9f130ae3a3d1f53607419115c3d9fedbf1213a66 (diff) |
consolidating re-searches
-rw-r--r-- | lisp/mastodon-toot.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index 135c57c..94bdf2a 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -106,8 +106,7 @@ Set `mastodon-toot--content-warning' to nil." (let ((re "^|=+=|$")) (save-excursion (goto-char 0) - (re-search-forward re) - (re-search-forward re) ; end of the docs + (re-search-forward re nil nil 2) (buffer-substring (+ 2 (point)) (+ 1 (length (buffer-string))))))) (defun mastodon-toot--send () |