Respostas:
A maneira mais direta de fazer isso seria
M-%
( query-replace
)C-q C-j RET </li> C-q C-j <li> RET
( C-q C-j
insere um caractere de nova linha entre aspas)!
para substituir todas as ocorrênciasComo alternativa para substituir a consulta, você pode usar vários cursores :
Considere também usar algo como isto:
(defun wrap-html-tag (tagName)
"Add a tag to beginning and ending of current word or text selection."
(interactive "sEnter tag name: ")
(let (p1 p2 inputText)
(if (use-region-p)
(progn
(setq p1 (region-beginning) )
(setq p2 (region-end) )
)
(let ((bds (bounds-of-thing-at-point 'symbol)))
(setq p1 (car bds) )
(setq p2 (cdr bds) ) ) )
(goto-char p2)
(insert "</" tagName ">")
(goto-char p1)
(insert "<" tagName ">")
))
Para uma solução completa, converta seu texto em uma lista de modo organizacional e exporte para HTML . Prefixe as linhas com '*', ativo org-mode
e execute org-html-export-to-html
.
org-mode
e exportar para HTML), tudo bem, mas não acho que faça sentido censurar as pessoas por quererem "ser rápido e sujo" Geração de HTML.