(list-text-properties-at): Set help-xref-stack to

nil.

diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index f6272103801fa414565985b5d9ecc357b39b711b..49b5a386ac0aefebae0e9e3f86004ed1446fe0c6 100644 (file)
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -459,6 +459,7 @@ These special properties include `invisible', `intangible' and `read-only'."
          (message "%s" str)
        (with-output-to-temp-buffer "*Text Properties*"
          (princ (format "Text properties at %d:\n\n" p))
+         (setq help-xref-stack nil)
          (while props
            (if (eq (car props) 'category)
                (setq category (car (cdr props))))