From 28ba698262eae67368e25662298f7bd2b412d61c Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 23 Jun 2016 15:13:14 +0200 Subject: [PATCH] org-macs: Remove `org-replace-match-keep-properties' * lisp/org-macs.el (org-replace-match-keep-properties): Remove function. This function is unused through the code base and doesn't specifically belong to a public API. --- lisp/org-macs.el | 7 ------- 1 file changed, 7 deletions(-) diff --git a/lisp/org-macs.el b/lisp/org-macs.el index cefe89531..762f6b108 100644 --- a/lisp/org-macs.el +++ b/lisp/org-macs.el @@ -231,13 +231,6 @@ This is in contrast to merely setting it to 0." (setq plist (cddr plist))) p)) -(defun org-replace-match-keep-properties (newtext &optional fixedcase - literal string) - "Like `replace-match', but add the text properties found original text." - (setq newtext (org-add-props newtext (text-properties-at - (match-beginning 0) string))) - (replace-match newtext fixedcase literal string)) - (defmacro org-save-outline-visibility (use-markers &rest body) "Save and restore outline visibility around BODY. If USE-MARKERS is non-nil, use markers for the positions.