From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 12 Jun 2019 23:33:27 +0000 (+0200)
Subject: Fix warning about obsolete func calling obsolete func in etags.el
X-Git-Tag: emacs-27.0.90~2589
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=982af7f516efb190d19946bff7bb37567328b4b9;p=emacs.git

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 910c320ab8f..7bf575340ec 100644
--- 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)