diff --git a/lv.el b/lv.el index ef67db7..65989bc 100644 --- a/lv.el +++ b/lv.el @@ -58,7 +58,8 @@ (defun lv-message (format-string &rest args) "Set LV window contents to (`format' FORMAT-STRING ARGS)." (let ((ori (selected-window)) - (str (apply #'format format-string args))) + (str (apply #'format format-string args)) + deactivate-mark) (select-window (lv-window)) (unless (string= (buffer-string) str) (delete-region (point-min) (point-max))