summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2020-03-05 12:10:51 +0100
committerMattias EngdegÄrd <mattiase@acm.org>2020-03-05 12:12:18 +0100
commit40fb20061e6b9b2b22aeee5b7e9f038dc9ba843b (patch)
treedb8dfa54132dc48dd865466c29283133cfaa9ebb /lisp/emacs-lisp
parent08d7d28d35aa0c755d6f77b382592ba31552adc2 (diff)
downloademacs-40fb20061e6b9b2b22aeee5b7e9f038dc9ba843b.tar.gz
emacs-40fb20061e6b9b2b22aeee5b7e9f038dc9ba843b.tar.bz2
emacs-40fb20061e6b9b2b22aeee5b7e9f038dc9ba843b.zip
* lisp/emacs-lisp/rx.el (rx--string-to-intervals): Fix error string.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/rx.el2
1 files changed, 1 insertions, 1 deletions
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.