branch: elpa/annotate commit e04e0ebc0c668f000c8ca28626598b0816447b39 Author: Bastian Bechtold <bb@Mr-Bigglesworth.local> Commit: Bastian Bechtold <bb@Mr-Bigglesworth.local>
deactivate mark after creating annotation --- annotate.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/annotate.el b/annotate.el index 88d72922ec..a30a6e5b78 100644 --- a/annotate.el +++ b/annotate.el @@ -484,7 +484,8 @@ an overlay and it's annotation." (when (not (or (eq nil annotation) (string= "" annotation))) (let ((highlight (make-overlay start end))) (overlay-put highlight 'face 'annotate-highlight) - (overlay-put highlight 'annotation annotation)))) + (overlay-put highlight 'annotation annotation)) + (if (use-region-p) (deactivate-mark)))) (save-excursion (goto-char end) (font-lock-fontify-block 1)))