From: Austin Clements Date: Mon, 21 Nov 2011 01:07:02 +0000 (-0500) Subject: emacs: Avoid unnecessary markers. X-Git-Tag: 0.11_rc1~110 X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=9cfafc070a4df4935781a274f039dc63790ed0c2;ds=sidebyside emacs: Avoid unnecessary markers. This is just cleanup. These markers are all immediately resolved to points by Emacs, so using markers here is just unncessary overhead. --- diff --git a/emacs/notmuch.el b/emacs/notmuch.el index a8e4d622..f15a75b1 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -805,12 +805,12 @@ non-authors is found, assume that all of the authors match." (goto-char (point-max)) (if (/= (match-beginning 1) line) (insert (concat "Error: Unexpected output from notmuch search:\n" (substring string line (match-beginning 1)) "\n"))) - (let ((beg (point-marker))) + (let ((beg (point))) (notmuch-search-show-result date count authors subject tags) - (notmuch-search-color-line beg (point-marker) tag-list) - (put-text-property beg (point-marker) 'notmuch-search-thread-id thread-id) - (put-text-property beg (point-marker) 'notmuch-search-authors authors) - (put-text-property beg (point-marker) 'notmuch-search-subject subject) + (notmuch-search-color-line beg (point) tag-list) + (put-text-property beg (point) 'notmuch-search-thread-id thread-id) + (put-text-property beg (point) 'notmuch-search-authors authors) + (put-text-property beg (point) 'notmuch-search-subject subject) (if (string= thread-id notmuch-search-target-thread) (progn (set 'found-target beg)