aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Mayo <dave_mayo@harvard.edu>2014-11-14 10:57:49 -0500
committerDave Mayo <dave_mayo@harvard.edu>2014-11-14 10:57:49 -0500
commit210ec4e9a075fd1b4631efd9e03381bb10f7a5ab (patch)
treef0dfc73a5aaf39843b8c5a947ec99c3824ec69ad
parent06f0a46f5bcd13999cba3d6876bfd611b9fc0233 (diff)
downloademmet-mode-210ec4e9a075fd1b4631efd9e03381bb10f7a5ab.tar.lz
emmet-mode-210ec4e9a075fd1b4631efd9e03381bb10f7a5ab.tar.xz
emmet-mode-210ec4e9a075fd1b4631efd9e03381bb10f7a5ab.zip
Fixes #50 - Checks start of region for flash after insert.
-rw-r--r--emmet-mode.el4
-rw-r--r--src/mode-def.el9
2 files changed, 10 insertions, 3 deletions
diff --git a/emmet-mode.el b/emmet-mode.el
index d691970..330658a 100644
--- a/emmet-mode.el
+++ b/emmet-mode.el
@@ -461,7 +461,9 @@ cursor position will be moved to after the first quote."
(let ((here (point)))
(insert markup)
(if emmet-indent-after-insert
- (indent-region here (point)))
+ (let ((pre-indent-point (point)))
+ (indent-region here (point))
+ (setq here (+ here (- (point) pre-indent-point)))))
(setq emmet-flash-ovl (make-overlay here (point)))
(overlay-put emmet-flash-ovl 'face 'emmet-preview-output)
(when (< 0 emmet-insert-flash-time)
diff --git a/src/mode-def.el b/src/mode-def.el
index d04f805..b3c7541 100644
--- a/src/mode-def.el
+++ b/src/mode-def.el
@@ -307,8 +307,13 @@ cursor position will be moved to after the first quote."
(emmet-remove-flash-ovl (current-buffer))
(let ((here (point)))
(insert markup)
- (if emmet-indent-after-insert
- (indent-region here (point)))
+ (when emmet-indent-after-insert
+ (indent-region here (point))
+ (setq here
+ (save-excursion
+ (goto-char here)
+ (skip-chars-forward "\s-")
+ (point))))
(setq emmet-flash-ovl (make-overlay here (point)))
(overlay-put emmet-flash-ovl 'face 'emmet-preview-output)
(when (< 0 emmet-insert-flash-time)