monnier pushed a commit to branch master
in repository elpa.
commit e5d13d55642d438e6f97628cdfd6a0f61c175d12
Author: Teemu Likonen <[email protected]>
Date: Tue May 26 16:50:24 2009 +0000
Uusi nimi funktiolle: ...-overlay-word -> ...-changed-overlay
---
wcheck-mode.el | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index 1da1dcc..042ffea 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -839,9 +839,9 @@ LANGUAGE."
(face (wcheck-query-language-data language 'face t)))
(dolist (prop `((wcheck-mode . t)
(face . ,face)
- (modification-hooks . (wcheck-remove-overlay-word))
- (insert-in-front-hooks . (wcheck-remove-overlay-word))
- (insert-behind-hooks . (wcheck-remove-overlay-word))
+ (modification-hooks . (wcheck-remove-changed-overlay))
+ (insert-in-front-hooks . (wcheck-remove-changed-overlay))
+ (insert-behind-hooks . (wcheck-remove-changed-overlay))
(evaporate . t)))
(overlay-put overlay (car prop) (cdr prop)))))
@@ -853,7 +853,7 @@ range BEG to END. Otherwise remove all overlays."
(remove-overlays beg end 'wcheck-mode t))
-(defun wcheck-remove-overlay-word (overlay after beg end &optional len)
+(defun wcheck-remove-changed-overlay (overlay after beg end &optional len)
"Hook for removing overlay which is being edited."
(unless after
(delete-overlay overlay)))