From: Mattias Engdegård <mattiase@acm.org>
Date: Thu, 5 Mar 2020 11:10:51 +0000 (+0100)
Subject: * lisp/emacs-lisp/rx.el (rx--string-to-intervals): Fix error string.
X-Git-Tag: emacs-27.0.91~128
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=40fb20061e;p=emacs.git

* lisp/emacs-lisp/rx.el (rx--string-to-intervals): Fix error string.
---

diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el
index a0b2444346a..d4a91710273 100644
--- a/lisp/emacs-lisp/rx.el
+++ b/lisp/emacs-lisp/rx.el
@@ -360,7 +360,7 @@ character X becomes (?X . ?X).  Return the intervals in a list."
                       (push (cons start end) intervals))
                      (t
                       (error "Invalid rx `any' range: %s"
-                             (substring str i 3))))
+                             (substring str i (+ i 3)))))
                (setq i (+ i 3))))
             (t
              ;; Single character.