diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 590db570c56..45fa188d6c8 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -2048,14 +2048,8 @@ With argument ARG, insert value in current buffer after the form." | |||
| 2048 | (not (eobp))) | 2048 | (not (eobp))) |
| 2049 | (setq byte-compile-read-position (point) | 2049 | (setq byte-compile-read-position (point) |
| 2050 | byte-compile-last-position byte-compile-read-position) | 2050 | byte-compile-last-position byte-compile-read-position) |
| 2051 | (let* ((lread--old-style-backquotes nil) | 2051 | (let* ((lread--unescaped-character-literals nil) |
| 2052 | (lread--unescaped-character-literals nil) | ||
| 2053 | (form (read inbuffer))) | 2052 | (form (read inbuffer))) |
| 2054 | ;; Warn about the use of old-style backquotes. | ||
| 2055 | (when lread--old-style-backquotes | ||
| 2056 | (byte-compile-warn "!! The file uses old-style backquotes !! | ||
| 2057 | This functionality has been obsolete for more than 10 years already | ||
| 2058 | and will be removed soon. See (elisp)Backquote in the manual.")) | ||
| 2059 | (when lread--unescaped-character-literals | 2053 | (when lread--unescaped-character-literals |
| 2060 | (byte-compile-warn | 2054 | (byte-compile-warn |
| 2061 | "unescaped character literals %s detected!" | 2055 | "unescaped character literals %s detected!" |