tastytea/.emacs.d
tastytea/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Emacs: Add blockquote as suggestion to my/html-surround-with-tag.

Browse Source
This commit is contained in:
tastytea 2021-03-11 18:40:34 +01:00
parent a5d6f9a88e
commit 3372124e8c
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
init.d/text/web.el
View File

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