company-with-candidate-inserted: restore buffer modification status

diff --git a/company.el b/company.el
index 505cc82c6261d2e161abb980da003c4f29ff19db..0991f6db8d01c9539741761ac0d00e0fee3aa4ff 100644 (file)
--- a/company.el
+++ b/company.el
@@ -989,7 +989,8 @@ can retrieve meta-data for them."
      (company--insert-candidate ,candidate)
      (unwind-protect
          (progn ,@body)
-       (delete-region company-point (point)))))
+       (delete-region company-point (point))
+       (set-buffer-modified-p modified-p))))
 
 (defun company-explicit-action-p ()
   "Return whether explicit completion action was taken by the user."