Re-order suggestions in (my/html-surround-with-tag ()).
This commit is contained in:
parent
7513b9ae26
commit
6a5981d19a
|
@ -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 ">")))
|
||||
|
|
Loading…
Reference in New Issue
Block a user