From b3a0345c7cd5f3e7d374aeaa89620f3cb8a1ef47 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Thu, 17 Dec 2015 00:59:32 +0100 Subject: [PATCH] Fix warning in oni-html --- emacs/.emacs.d/init.el | 7 ------- emacs/.emacs.d/site-lisp/oni-html.el | 7 +++++++ 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el index 0c0310e..fe2e6f5 100644 --- a/emacs/.emacs.d/init.el +++ b/emacs/.emacs.d/init.el @@ -389,13 +389,6 @@ use. If MODE is not nil, open a new buffer with the name (interactive) (revert-buffer nil t nil)) -(defun oni:replace-occurrences (from to) - "Replace all occurrences of FROM with TO in the current buffer." - (save-excursion - (goto-char (point-min)) - (while (search-forward from nil t) - (replace-match to)))) - (defun oni:request-pull () "Start a mail to request pulling from a git repository." (interactive) diff --git a/emacs/.emacs.d/site-lisp/oni-html.el b/emacs/.emacs.d/site-lisp/oni-html.el index e352ea4..88b961d 100644 --- a/emacs/.emacs.d/site-lisp/oni-html.el +++ b/emacs/.emacs.d/site-lisp/oni-html.el @@ -31,6 +31,13 @@ (oni:replace-occurrences "‘" "‘") (oni:replace-occurrences "ë" "ë")) +(defun oni:replace-occurrences (from to) + "Replace all occurrences of FROM with TO in the current buffer." + (save-excursion + (goto-char (point-min)) + (while (search-forward from nil t) + (replace-match to)))) + ;;;###autoload (defun oni:replace-html-special-chars-in-html-mode () "Replace special characters with HTML escaped entities in HTML mode."