diff options
| author | Paul Pogonyshev <pogonyshev@gmail.com> | 2018-12-27 20:10:47 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2018-12-27 20:25:52 -0800 |
| commit | 47d656f6024786dfdaf53be1c6db6a47b8666b7f (patch) | |
| tree | d197198b84869dad4b3cc176e153dcaa007543fc /lisp | |
| parent | ee7514b91beb254a7dc62f618046d34036555cea (diff) | |
| download | emacs-47d656f6024786dfdaf53be1c6db6a47b8666b7f.tar.gz | |
Accept 1-arg 'substring' calls in byte compiler
Those have been supported by the function implementation since
commit 2014-03-31T12:06:34Z!dmantipov@yandex.ru (Bug#33807).
* lisp/emacs-lisp/bytecomp.el: substring has 1-3 args, not 2-3.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index c0a764bafca..43f2289ab7c 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -3534,7 +3534,7 @@ If it is nil, then the handler is \"byte-compile-SYMBOL.\"" (byte-defop-compiler (>= byte-geq) 2-and) (byte-defop-compiler get 2) (byte-defop-compiler nth 2) -(byte-defop-compiler substring 2-3) +(byte-defop-compiler substring 1-3) (byte-defop-compiler (move-marker byte-set-marker) 2-3) (byte-defop-compiler set-marker 2-3) (byte-defop-compiler match-beginning 1) |