/[emacs]/emacs/src/fns.c
ViewVC logotype

Diff of /emacs/src/fns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.385 by lute, Mon Apr 18 10:20:46 2005 UTC revision 1.386 by kfstorm, Tue Apr 19 08:34:19 2005 UTC
# Line 2051  This is the last value stored with `(put Line 2051  This is the last value stored with `(put
2051    return Fplist_get (XSYMBOL (symbol)->plist, propname);    return Fplist_get (XSYMBOL (symbol)->plist, propname);
2052  }  }
2053    
2054    DEFUN ("safe-get", Fsafe_get, Ssafe_get, 2, 2, 0,
2055           doc: /* Return the value of SYMBOL's PROPNAME property.
2056    This is the last value stored with `(put SYMBOL PROPNAME VALUE)'.
2057    This function never signals an error.  */)
2058         (symbol, propname)
2059         Lisp_Object symbol, propname;
2060    {
2061      if (!SYMBOLP (symbol))
2062        return Qnil;
2063      return Fsafe_plist_get (XSYMBOL (symbol)->plist, propname);
2064    }
2065    
2066  DEFUN ("plist-put", Fplist_put, Splist_put, 3, 3, 0,  DEFUN ("plist-put", Fplist_put, Splist_put, 3, 3, 0,
2067         doc: /* Change value in PLIST of PROP to VAL.         doc: /* Change value in PLIST of PROP to VAL.
2068  PLIST is a property list, which is a list of the form  PLIST is a property list, which is a list of the form
# Line 5792  used if both `use-dialog-box' and this v Line 5804  used if both `use-dialog-box' and this v
5804    defsubr (&Splist_get);    defsubr (&Splist_get);
5805    defsubr (&Ssafe_plist_get);    defsubr (&Ssafe_plist_get);
5806    defsubr (&Sget);    defsubr (&Sget);
5807      defsubr (&Ssafe_get);
5808    defsubr (&Splist_put);    defsubr (&Splist_put);
5809    defsubr (&Sput);    defsubr (&Sput);
5810    defsubr (&Slax_plist_get);    defsubr (&Slax_plist_get);

Legend:
Removed from v.1.385  
changed lines
  Added in v.1.386

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26