diff options
author | clarkenciel <clarkenciel@gmail.com> | 2017-04-28 10:52:32 -0700 |
---|---|---|
committer | Johnson Denen <johnson.denen@gmail.com> | 2017-04-28 19:57:23 -0400 |
commit | 92e2c1a81ccac8831cddef8d625de0bc51ef2193 (patch) | |
tree | dc0b7cc77a50b5da7f1da5053806de7f21803296 | |
parent | 6fc589020b0358cb7504f9252a22adeae812cb88 (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 () |