# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1135984503 0
# Node ID 7538cafcf9f76cf294b17eed9f01acff21669e68
# Parent  ec6bcc17dae209bf5565527236a239f3e4e02300
(set_text_properties): Reword description of return value.
Return Qnil if caller wants to remove all text properties from a
string and the string already has no intervals.

diff -r ec6bcc17dae2 -r 7538cafcf9f7 src/textprop.c
--- a/src/textprop.c	Fri Dec 30 23:13:54 2005 +0000
+++ b/src/textprop.c	Fri Dec 30 23:15:03 2005 +0000
@@ -1316,8 +1316,8 @@
    properties PROPERTIES.  OBJECT is the buffer or string containing
    the text.  OBJECT nil means use the current buffer.
    SIGNAL_AFTER_CHANGE_P nil means don't signal after changes.  Value
-   is non-nil if properties were replaced; it is nil if there weren't
-   any properties to replace.  */
+   is nil if the function _detected_ that it did not replace any
+   properties, non-nil otherwise.  */
 
 Lisp_Object
 set_text_properties (start, end, properties, object, signal_after_change_p)
@@ -1341,7 +1341,7 @@
       && XFASTINT (end) == SCHARS (object))
     {
       if (! STRING_INTERVALS (object))
-	return Qt;
+	return Qnil;
 
       STRING_SET_INTERVALS (object, NULL_INTERVAL);
       return Qt;