branch: elpa/pcre2el
commit cd00dd6650749c8ec8c5d0db77a0ba46548d1a62
Author: Wes Hardaker <opensou...@hardakers.net>
Commit: GitHub <nore...@github.com>

    Revert "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 9e5a911a92..12c24f87db 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-no-properties (minibuffer-prompt-end) (point-max))
+  (setf (buffer-substring (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-no-properties begin (point))))))
+                     (buffer-substring begin (point))))))
 
       ;; Parse the remainder of the subgroup
       (unless shy (cl-incf rxt-subgroup-count))

Reply via email to