Minor cleanup in src/textprop.c.

 src/textprop.c (syms_of_textprop): Remove dead code.
 (copy_text_properties): Delete obsolete commentary about an
 interface that was deleted long ago.  Fix typos in the description
 of arguments.

2 files changed, 7 insertions, 10 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 7efd8dad6cc..f4dd3492001 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,10 @@
 2011-04-24  Eli Zaretskii  <eliz@gnu.org>
 
+        * textprop.c (syms_of_textprop): Remove dead code.
+        (copy_text_properties): Delete obsolete commentary about an
+        interface that was deleted long ago.  Fix typos in the description
+        of arguments.
+
         * msdos.c (XMenuActivate, XMenuAddSelection): Adjust argument list
         to changes in oldXMenu/XMenu.h from 2011-04-16.
         <menu_help_message, prev_menu_help_message>: Constify.
diff --git a/src/textprop.c b/src/textprop.c
index 1c56dfc0cf0..a224c121e21 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -1756,15 +1756,9 @@ text_property_stickiness (Lisp_Object prop, Lisp_Object pos, Lisp_Object buffer)
 }
 
 
-/* I don't think this is the right interface to export; how often do you
-   want to do something like this, other than when you're copying objects
-   around?
+/* Copying properties between objects. */
 
-   I think it would be better to have a pair of functions, one which
-   returns the text properties of a region as a list of ranges and
-   plists, and another which applies such a list to another object.  */
-
-/* Add properties from SRC to SRC of SRC, starting at POS in DEST.
+/* Add properties from START to END of SRC, starting at POS in DEST.
    SRC and DEST may each refer to strings or buffers.
    Optional sixth argument PROP causes only that property to be copied.
    Properties are copied to DEST as if by `add-text-properties'.
@@ -2304,6 +2298,4 @@ inherits it if NONSTICKINESS is nil.  The `front-sticky' and
   defsubr (&Sremove_list_of_text_properties);
   defsubr (&Stext_property_any);
   defsubr (&Stext_property_not_all);
-/*  defsubr (&Serase_text_properties); */
-/*  defsubr (&Scopy_text_properties); */
 }