Fix warning about obsolete func calling obsolete func in etags.el

* lisp/progmodes/etags.el (find-tag-other-frame): Don't give a
warning about an obsolete function calling another obsolete function.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 910c320ab8fe3ae7502cd16cfe12761f8adc4d59..7bf575340ec62276e96428aa07232ee45fb5a613 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1036,7 +1036,8 @@ See documentation of variable `tags-file-name'."
   (declare (obsolete xref-find-definitions-other-frame "25.1"))
   (interactive (find-tag-interactive "Find tag other frame: "))
   (let ((pop-up-frames t))
-    (find-tag-other-window tagname next-p)))
+    (with-suppressed-warnings ((obsolete find-tag-other-window))
+      (find-tag-other-window tagname next-p))))
 
 ;;;###autoload
 (defun find-tag-regexp (regexp &optional next-p other-window)