Mercurial > emacs

changeset 29953:dad7b11391a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fplist_member): Renamed from Fwidget_plist_member. (Fwidget_get): Use it. (syms_of_fns): Defsubr it.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 26 Jun 2000 21:53:57 +0000
parents 3e2589e69a8a
children 94c96c958d39
files src/fns.c
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Mon Jun 26 20:02:42 2000 +0000
+++ b/src/fns.c	Mon Jun 26 21:53:57 2000 +0000
@@ -2950,7 +2950,7 @@
    bottleneck of Widget operation.  Here is their translation to C,
    for the sole reason of efficiency.  */
 
-DEFUN ("widget-plist-member", Fwidget_plist_member, Swidget_plist_member, 2, 2, 0,
+DEFUN ("plist-member", Fplist_member, Splist_member, 2, 2, 0,
   "Return non-nil if PLIST has the property PROP.\n\
 PLIST is a property list, which is a list of the form\n\
 \(PROP1 VALUE1 PROP2 VALUE2 ...\).  PROP is a symbol.\n\
@@ -2994,7 +2994,7 @@
       if (NILP (widget))
 	return Qnil;
       CHECK_CONS (widget, 1);
-      tmp = Fwidget_plist_member (XCDR (widget), property);
+      tmp = Fplist_member (XCDR (widget), property);
       if (CONSP (tmp))
 	{
 	  tmp = XCDR (tmp);
@@ -4907,7 +4907,7 @@
   defsubr (&Sfeaturep);
   defsubr (&Srequire);
   defsubr (&Sprovide);
-  defsubr (&Swidget_plist_member);
+  defsubr (&Splist_member);
   defsubr (&Swidget_put);
   defsubr (&Swidget_get);
   defsubr (&Swidget_apply);