branch: elpa/pcre2el
commit 0565b3a7eed1b43287ce72714c67ebb3a61e3aae
Merge: 380723b270 9b23ecd63d
Author: Wes Hardaker <opensou...@hardakers.net>
Commit: GitHub <nore...@github.com>
Merge pull request #58 from haowg/patch-1
Fix: Obsolete `buffer-substring` function replaced with `buffer-subst…
---
pcre2el.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/pcre2el.el b/pcre2el.el
index 12c24f87db..9e5a911a92 100644
--- a/pcre2el.el
+++ b/pcre2el.el
@@ -660,7 +660,7 @@ Note that this does not apply to backreferences."
(reb-do-update))
(defun rxt--toggle-flag-minibuffer (char)
- (setf (buffer-substring (minibuffer-prompt-end) (point-max))
+ (setf (buffer-substring-no-properties (minibuffer-prompt-end) (point-max))
(rxt--toggle-flag-string (minibuffer-contents) char))
(when
(and (= (point) (minibuffer-prompt-end))
@@ -2493,7 +2493,7 @@ in character classes as outside them."
(let ((begin (point)))
(search-forward ")" nil 'go-to-end)
(rxt-error "Unrecognized PCRE extended construction `(*%s'"
- (buffer-substring begin (point))))))
+ (buffer-substring-no-properties begin (point))))))
;; Parse the remainder of the subgroup
(unless shy (cl-incf rxt-subgroup-count))
