Emacs: Add blockquote as suggestion to my/html-surround-with-tag.
This commit is contained in:
parent
a5d6f9a88e
commit
3372124e8c
|
@ -20,7 +20,8 @@
|
|||
"Surround region with HTML tag."
|
||||
(interactive "*r")
|
||||
(if (region-active-p)
|
||||
(let ((tag (completing-read "Tag: " '("em" "strong"))))
|
||||
(let ((tag (completing-read "Tag: "
|
||||
'("em" "strong" "blockquote"))))
|
||||
(insert (concat "<" tag ">"
|
||||
(delete-and-extract-region beg end)
|
||||
"</" tag ">")))
|
||||
|
|
Loading…
Reference in New Issue
Block a user