# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1187798922 0
# Node ID bd2ba451e2affa5dd4d7fd9e91ddee51d9e2a7ed
# Parent  036719d86e2c41a4b1f122f5c9858b06ad2490e1
(byte-compile-from-buffer): Display a big fat warning for old style backquotes.

diff -r 036719d86e2c -r bd2ba451e2af lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Aug 22 15:55:10 2007 +0000
+++ b/lisp/ChangeLog	Wed Aug 22 16:08:42 2007 +0000
@@ -1,5 +1,8 @@
 2007-08-22  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* emacs-lisp/bytecomp.el (byte-compile-from-buffer): Display a big fat
+	warning if the file uses old style backquotes.
+
 	* emacs-lisp/bytecomp.el (byte-compile-log-file)
 	(byte-recompile-directory, byte-compile-file)
 	(byte-compile-from-buffer): Use with-current-buffer.
diff -r 036719d86e2c -r bd2ba451e2af lisp/emacs-lisp/bytecomp.el
--- a/lisp/emacs-lisp/bytecomp.el	Wed Aug 22 15:55:10 2007 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Wed Aug 22 16:08:42 2007 +0000
@@ -1821,6 +1821,7 @@
 	;; new in Emacs 22.1.
 	(read-with-symbol-positions inbuffer)
 	(read-symbol-positions-list nil)
+        (old-style-backquotes nil)
 	;;	  #### This is bound in b-c-close-variables.
 	;;	  (byte-compile-warnings (if (eq byte-compile-warnings t)
 	;;				     byte-compile-warning-types
@@ -1865,7 +1866,12 @@
 	;; Make warnings about unresolved functions
 	;; give the end of the file as their position.
 	(setq byte-compile-last-position (point-max))
-	(byte-compile-warn-about-unresolved-functions))
+	(byte-compile-warn-about-unresolved-functions)
+        ;; Warn about the use of old-style backquotes.
+        (when 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.")))
       ;; Fix up the header at the front of the output
       ;; if the buffer contains multibyte characters.
       (and filename (byte-compile-fix-header filename inbuffer outbuffer))))
diff -r 036719d86e2c -r bd2ba451e2af lispref/macros.texi
--- a/lispref/macros.texi	Wed Aug 22 15:55:10 2007 +0000
+++ b/lispref/macros.texi	Wed Aug 22 16:08:42 2007 +0000
@@ -365,7 +365,7 @@
 following expression.
 
 This syntax is still accepted, for compatibility with old Emacs
-versions, but we recommend not using it in new programs.
+versions, but support for it will soon disappear.
 
 @node Problems with Macros
 @section Common Problems Using Macros