Make text-properties-at mention describe-text-properties

* src/textprop.c (Ftext_properties_at): Mention
describe-text-properties in the doc string.

1 files changed, 4 insertions, 1 deletions

diff --git a/src/textprop.c b/src/textprop.c
index 93d19754da5..dd2e68891e6 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -561,7 +561,10 @@ DEFUN ("text-properties-at", Ftext_properties_at,
 If the optional second argument OBJECT is a buffer (or nil, which means
 the current buffer), POSITION is a buffer position (integer or marker).
 If OBJECT is a string, POSITION is a 0-based index into it.
-If POSITION is at the end of OBJECT, the value is nil.  */)
+If POSITION is at the end of OBJECT, the value is nil.
+
+If you want to display the text properties at point in a human-readable
+form, the `describe-text-properties' command can be used.  */)
   (Lisp_Object position, Lisp_Object object)
 {
   register INTERVAL i;