[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/pcre2el 9b23ecd63d 1/2: Fix: Obsolete `buffer-substring` f
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/pcre2el 9b23ecd63d 1/2: Fix: Obsolete `buffer-substring` function replaced with `buffer-substring-no-properties` |
Date: |
Fri, 28 Jun 2024 19:00:27 -0400 (EDT) |
branch: elpa/pcre2el
commit 9b23ecd63d28e0262ef789d187785ad0cfde0b32
Author: haowg <haoweiguoyouxiang@163.com>
Commit: GitHub <noreply@github.com>
Fix: Obsolete `buffer-substring` function replaced with
`buffer-substring-no-properties`
* Replaced `buffer-substring` with `buffer-substring-no-properties` to
avoid using an obsolete function.
* Updated code to use the recommended function for extracting substrings
from the current buffer.
---
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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/pcre2el 9b23ecd63d 1/2: Fix: Obsolete `buffer-substring` function replaced with `buffer-substring-no-properties`,
ELPA Syncer <=