yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet
Jim Myhrberg 09cc3eec21 Keep snippet vars definitions in a single format across all snippets and documentation.
The format is:

# var-name: value

Previously snippets used a mixture of the following formatting:

#var-name: value
#var-name : value
# var-name: value
# var-name : value
2011-11-03 20:51:31 +00:00

18 lines
608 B
Plaintext
Executable File

# contributor: Xah Lee (XahLee.org)
# name: find and replace on region
# key: x-find-replace
# --
(defun replace-html-chars-region (start end)
"Replace “<” to “&lt;” and other chars in HTML.
This works on the current region."
(interactive "r")
(save-restriction
(narrow-to-region start end)
(goto-char (point-min))
(while (search-forward "&" nil t) (replace-match "&amp;" nil t))
(goto-char (point-min))
(while (search-forward "<" nil t) (replace-match "&lt;" nil t))
(goto-char (point-min))
(while (search-forward ">" nil t) (replace-match "&gt;" nil t))
)
)