From b2013aad9bdfc147a7351c058cbf672bc5bdcbcc Mon Sep 17 00:00:00 2001
From: Sam Steingold <sds@gnu.org>
Date: Tue, 27 Nov 2001 18:00:53 +0000
Subject: [PATCH] Converted backquote to the new style (in comments).

---
 lisp/ChangeLog     | 1 +
 lisp/mouse.el      | 4 ++--
 lisp/reposition.el | 5 ++---
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6699bf7197..f39090f4a69 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,7 @@
 	* progmodes/dcl-mode.el, progmodes/idlw-shell.el, progmodes/idlwave.el
 	* term/sun-mouse.el, textmodes/artist.el:
 	Converted backquote to the new style.
+	* mouse.el, reposition.el: Likewise (in comments).
 
 2001-11-27  Richard M. Stallman  <rms@gnu.org>
 
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 73fed571f4e..0ad52d5d7d7 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -743,7 +743,7 @@ remains active.  Otherwise, it remains until the next input event."
 		  (mouse-scroll-subr start-window (1+ (- mouse-row bottom))
 				     mouse-drag-overlay start-point)
 		  (setq end-of-range (overlay-end mouse-drag-overlay))))))))))
-      
+
       ;; In case we did not get a mouse-motion event
       ;; for the final move of the mouse before a drag event
       ;; pretend that we did get one.
@@ -1860,7 +1860,7 @@ and selects that window."
 ;;;!! ;;	       (abs-x (car pos))
 ;;;!! ;;	       (abs-y (cdr pos))
 ;;;!! ;;	       (relative-coordinate
-;;;!! ;;		(coordinates-in-window-p (` ((, abs-x) (, abs-y)))
+;;;!! ;;		(coordinates-in-window-p `(,abs-x ,abs-y)
 ;;;!! ;;					 (selected-window)))
 ;;;!! ;;	       (begin-reg nil)
 ;;;!! ;;	       (end-reg nil)
diff --git a/lisp/reposition.el b/lisp/reposition.el
index fa3f8b782f4..0811f8dd574 100644
--- a/lisp/reposition.el
+++ b/lisp/reposition.el
@@ -191,9 +191,8 @@ first comment line visible (if point is in a comment)."
       (- lines))))
 
 ;; (defmacro repos-debug-macro (case-no)
-;;   (` (message
-;;       (concat "Case " (, case-no) ": %s %s %s %s %s")
-;;       ht line comment-height defun-height defun-depth)))
+;;   `(message (concat "Case " ,case-no ": %s %s %s %s %s")
+;;             ht line comment-height defun-height defun-depth))
 
 (provide 'reposition)
 
-- 
2.39.5