summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorPhilipp Stephani <phst@google.com>2017-10-09 16:08:15 +0200
committerPhilipp Stephani <phst@google.com>2017-10-09 16:08:15 +0200
commit6abff55b5514515c5a28397b34aee478926af232 (patch)
treec7d722049149ad0182c86dc1ac20d72df74f4f7f /lisp/emacs-lisp
parent2c39565dc046d428127735552db6e7814631d4d4 (diff)
downloademacs-6abff55b5514515c5a28397b34aee478926af232.tar.gz
emacs-6abff55b5514515c5a28397b34aee478926af232.tar.bz2
emacs-6abff55b5514515c5a28397b34aee478926af232.zip
Revert "Raise an error when detecting old-style backquotes."
This reverts commit 9613690f6e51e2f2aa2bcbbede3e209d08cfaaad.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/bytecomp.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 45fa188d6c8..590db570c56 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2048,8 +2048,14 @@ With argument ARG, insert value in current buffer after the form."
(not (eobp)))
(setq byte-compile-read-position (point)
byte-compile-last-position byte-compile-read-position)
- (let* ((lread--unescaped-character-literals nil)
+ (let* ((lread--old-style-backquotes nil)
+ (lread--unescaped-character-literals nil)
(form (read inbuffer)))
+ ;; Warn about the use of old-style backquotes.
+ (when lread--old-style-backquotes
+ (byte-compile-warn "!! The file uses old-style backquotes !!
+This functionality has been obsolete for more than 10 years already
+and will be removed soon. See (elisp)Backquote in the manual."))
(when lread--unescaped-character-literals
(byte-compile-warn
"unescaped character literals %s detected!"