diff options
| author | Dave Mayo <pobocks@gmail.com> | 2014-08-25 07:12:22 -0400 |
|---|---|---|
| committer | Dave Mayo <pobocks@gmail.com> | 2014-08-25 07:12:22 -0400 |
| commit | c8fd50b6eaf02f44b32ee546021671353746168f (patch) | |
| tree | 8253ef24619eb1091d1f7ee0454def416544c980 /emmet-mode.el | |
| parent | 5b7aed673d83715f7f96910e6459415d094d5860 (diff) | |
| download | emmet-mode-c8fd50b6eaf02f44b32ee546021671353746168f.tar.lz emmet-mode-c8fd50b6eaf02f44b32ee546021671353746168f.tar.xz emmet-mode-c8fd50b6eaf02f44b32ee546021671353746168f.zip | |
WIP - Needs escaping figured out or avoided
Diffstat (limited to 'emmet-mode.el')
| -rw-r--r-- | emmet-mode.el | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/emmet-mode.el b/emmet-mode.el index 55bbb17..1df924e 100644 --- a/emmet-mode.el +++ b/emmet-mode.el @@ -3915,6 +3915,21 @@ accept it or skip it." (point)) (forward-char))))))) +(defun emmet-wrap-with-markup (wrap-with) + "Wrap region with markup." + (interactive "sExpression to wrap with: ") + (let* ((emmet-move-cursor-between-quotes nil) + (to-wrap (buffer-substring-no-properties (region-beginning) (region-end))) + (expr (concat wrap-with + ">{" + (replace-regexp-in-string "\\([}{]\\)" "\\\\\&" to-wrap) + "}")) + (markup (emmet-transform expr))) + (when markup + (delete-region (region-beginning) (region-end)) + (insert markup)))) + + ;;;###autoload (defun emmet-next-edit-point (count) (interactive "^p") |