Support for string-replace in old emacs

This commit is contained in:
Justin Abrahms 2021-08-13 16:08:16 +00:00
parent 8041774d3d
commit 85d28a65c6

View File

@ -25,6 +25,14 @@
(progn (progn
(checkdoc))) (checkdoc)))
;; backport for older emacs verisons
(if (not (fboundp 'string-replace))
(progn
(defun string-replace (from to in)
(replace-regexp-in-string (regexp-quote from) to in nil 'literal))
(declare-function string-replace "ox-gemini")
))
;; TODO: ;; TODO:
;; Sublists aren't supported in gemini ;; Sublists aren't supported in gemini