]> code.delx.au - gnu-emacs/commitdiff
* test/automated/elisp-mode-tests.el
authorGlenn Morris <rgm@gnu.org>
Tue, 21 Jul 2015 15:54:17 +0000 (08:54 -0700)
committerGlenn Morris <rgm@gnu.org>
Tue, 21 Jul 2015 15:54:17 +0000 (08:54 -0700)
(elisp-xref-finds-both-function-and-variable)
(elisp-xref-finds-only-function-for-minor-mode):
Update for recent xref name changes.

test/automated/elisp-mode-tests.el

index 85f6da22441fd9e41b8f2a6066ea2e9652fa5d20..2581de4693167fe6f5ff34afb0431e7b8ee4c45c 100644 (file)
   ;; "system-name" is both: a variable and a function
   (let ((defs (elisp-xref-find 'definitions "system-name")))
     (should (= (length defs) 2))
-    (should (string= (xref--xref-description (nth 0 defs))
+    (should (string= (xref-item-summary (nth 0 defs))
                      "(defun system-name)"))
-    (should (string= (xref--xref-description (nth 1 defs))
+    (should (string= (xref-item-summary (nth 1 defs))
                      "(defvar system-name)")))
   ;; It's a minor mode, but the variable is defined in buffer.c
   (let ((defs (elisp-xref-find 'definitions "abbrev-mode")))
   ;; Both variable and function are defined in the same place.
   (let ((defs (elisp-xref-find 'definitions "visible-mode")))
     (should (= (length defs) 1))
-    (should (string= (xref--xref-description (nth 0 defs))
+    (should (string= (xref-item-summary (nth 0 defs))
                      "(defun visible-mode)"))))
 
 (provide 'elisp-mode-tests)