Prevent error that character not found.
--- a/.emacs-my Thu Sep 21 19:50:19 2017 +0300
+++ b/.emacs-my Sun Sep 24 09:23:32 2017 +0300
@@ -3333,11 +3333,11 @@
(save-restriction
(narrow-to-region start end)
(goto-char (point-min))
- (while (search-forward "&") (replace-match "&"))
+ (while (search-forward "&" nil t) (replace-match "&"))
(goto-char (point-min))
- (while (search-forward "<") (replace-match "<"))
+ (while (search-forward "<" nil t) (replace-match "<"))
(goto-char (point-min))
- (while (search-forward ">") (replace-match ">"))
+ (while (search-forward ">" nil t) (replace-match ">"))
)))
(defun my-html-charref-from-char (char)