Re-order suggestions in (my/html-surround-with-tag ()).

This commit is contained in:
tastytea 2021-03-14 19:36:40 +01:00
parent 7513b9ae26
commit 6a5981d19a
Signed by: tastytea
GPG Key ID: CFC39497F1B26E07

View File

@ -21,7 +21,7 @@
(interactive "*r")
(if (region-active-p)
(let ((tag (completing-read "Tag: "
'("em" "strong" "blockquote"))))
'("blockquote" "em" "strong"))))
(insert (concat "<" tag ">"
(delete-and-extract-region beg end)
"</" tag ">")))