branch: elpa/ws-butler
commit 8c4cb5485a8cab00542dd3a94903653f61a40c7d
Author: Le Wang <[email protected]>
Commit: Le Wang <[email protected]>
Use (1- end) to hack around highlight-changes bug.
- fixes #7
---
ws-butler.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/ws-butler.el b/ws-butler.el
index f5eb98201e..3d30dacab4 100644
--- a/ws-butler.el
+++ b/ws-butler.el
@@ -187,7 +187,9 @@ ensure point doesn't jump due to white space trimming.
(save-excursion
(setq beg (progn (goto-char beg)
(point-at-bol))
- end (progn (goto-char end)
+ ;; Subtract one from end to overcome Emacs bug #17784, since we
+ ;; always expand to end of line anyway, this should be OK.
+ end (progn (goto-char (1- end))
(point-at-eol))))
(ws-butler-clean-region beg end)
(setq last-end end)))
