From: Dmitry Gutov <dgutov@yandex.ru>
Date: Fri, 10 Sep 2021 15:42:55 +0000 (+0300)
Subject: Fix test find-defs-defgeneric-el
X-Git-Tag: emacs-28.0.90~1077
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6eba633eadc4228f2b132cea257f1b32691fd6b2;p=emacs.git

Fix test find-defs-defgeneric-el

* test/lisp/progmodes/elisp-mode-tests.el (find-defs-defgeneric-el):
Fix the test.  Reported by dick.r.chiang@gmail.com.
---

diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el
index f47d54e59c0..2745aff670e 100644
--- a/test/lisp/progmodes/elisp-mode-tests.el
+++ b/test/lisp/progmodes/elisp-mode-tests.el
@@ -604,6 +604,12 @@ to (xref-elisp-test-descr-to-target xref)."
                 'xref-location-marker nil '(xref-etags-location))
                'cl-defmethod
                (expand-file-name "../../../lisp/progmodes/etags.el" emacs-test-dir)))
+   (xref-make "(cl-defmethod xref-location-marker ((l xref-etags-apropos-location)))"
+              (xref-make-elisp-location
+               (cl--generic-load-hist-format
+                'xref-location-marker nil '(xref-etags-apropos-location))
+               'cl-defmethod
+               (expand-file-name "../../../lisp/progmodes/etags.el" emacs-test-dir)))
    ))
 
 (xref-elisp-deftest find-defs-defgeneric-eval