branch: elpa/edit-indirect
commit 6fa78ff6f1444d8d89cfc9491dcc4c474cb60078
Author: Fanael Linithien <fana...@gmail.com>
Commit: Fanael Linithien <fana...@gmail.com>

    Prohibit modification at the beginning of the overlay.
---
 edit-indirect.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/edit-indirect.el b/edit-indirect.el
index a6d5d98e2d..20e4e63011 100644
--- a/edit-indirect.el
+++ b/edit-indirect.el
@@ -263,6 +263,7 @@ BEG and END specify the region the overlay should 
encompass."
   (let ((overlay (make-overlay beg end)))
     (overlay-put overlay 'face 'edit-indirect-edited-region)
     (overlay-put overlay 'modification-hooks '(edit-indirect--barf-read-only))
+    (overlay-put overlay 'insert-in-front-hooks 
'(edit-indirect--barf-read-only))
     overlay))
 
 (defvar edit-indirect--inhibit-read-only nil

Reply via email to