[Emacs-diffs] Changes to emacs/lisp/info-xref.el

[Eli Zaretskii]

Index: emacs/lisp/info-xref.el
diff -u emacs/lisp/info-xref.el:1.11 emacs/lisp/info-xref.el:1.12
--- emacs/lisp/info-xref.el:1.11        Mon Feb  6 14:33:34 2006
+++ emacs/lisp/info-xref.el     Sat May 20 18:10:27 2006
@@ -301,7 +301,10 @@
        (lambda (symbol)
          (dolist (link (get symbol 'custom-links))
            (when (memq (car link) '(custom-manual info-link))
-             (if (info-xref-goto-node-p (cadr link))
+            ;; skip :tag part of (custom-manual :tag "Foo" "(foo)Node")
+            (if (eq :tag (cadr link))
+                (setq link (cddr link)))
+            (if (info-xref-goto-node-p (cadr link))
                  (setq good (1+ good))
                (setq bad (1+ bad))
                ;; symbol-file gives nil for preloaded variables, would need