From 66d54dff2e5b4493117c9c0074b07bba25844cc6 Mon Sep 17 00:00:00 2001 From: clarkenciel Date: Fri, 28 Apr 2017 10:52:32 -0700 Subject: consolidating re-searches --- lisp/mastodon-toot.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lisp') 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 () -- cgit v1.2.3