* lisp/subr.el (function-put): Add function.

This commit is contained in:
Stefan Monnier 2014-05-09 12:51:17 -04:00
parent 0f09bbfa7f
commit a3eda656ee
2 changed files with 12 additions and 0 deletions

View file

@ -1,3 +1,7 @@
2014-05-09 Stefan Monnier <monnier@iro.umontreal.ca>
* subr.el (function-put): Add function.
2014-05-09 Stephen Berman <stephen.berman@gmx.net>
* calendar/todo-mode.el (todo-insert-item-from-calendar):

View file

@ -2683,6 +2683,14 @@ computing the hash. If BINARY is non-nil, return a string in binary
form."
(secure-hash 'sha1 object start end binary))
(defalias 'function-put #'put
;; This is only really used in Emacs>24.4, but we add it to 24.4 already, so
;; as to ease the pain when people use future autoload files that contain
;; function-put.
"Set function F's property PROP to VALUE.
The namespace for PROP is shared with symbols.
So far, F can only be a symbol, not a lambda expression.")
(defun function-get (f prop &optional autoload)
"Return the value of property PROP of function F.
If AUTOLOAD is non-nil and F is autoloaded, try to autoload it