*** info-xref.el.~1.11.~ 2006-02-13 07:38:01.000000000 +1100 --- info-xref.el 2006-04-17 16:47:02.000000000 +1000 *************** *** 301,306 **** --- 301,309 ---- (lambda (symbol) (dolist (link (get symbol 'custom-links)) (when (memq (car link) '(custom-manual info-link)) + ;; skip :tag part of eg. (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))