* lisp/emacs-lisp/cl.el (cl-set-getf): Add compatibility alias.

2 files changed, 5 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2a1c5b70199..fa4a85c1ca7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-01-26  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * emacs-lisp/cl.el (cl-set-getf): Add compatibility alias.
+
 2013-01-24  Fabián Ezequiel Gallina  <fgallina@cuca>
 
         * progmodes/python.el: Enhancements to header documentation about
diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el
index 81907f29637..0ad7d4b1592 100644
--- a/lisp/emacs-lisp/cl.el
+++ b/lisp/emacs-lisp/cl.el
@@ -713,6 +713,7 @@ You can replace this macro with `gv-letplace'."
   'cl--map-keymap-recursively "24.3")
 (define-obsolete-function-alias 'cl-map-intervals 'cl--map-intervals "24.3")
 (define-obsolete-function-alias 'cl-map-extents 'cl--map-overlays "24.3")
+(define-obsolete-function-alias 'cl-set-getf 'cl--set-getf "24.3")
 
 (defun cl-maclisp-member (item list)
   (declare (obsolete member "24.3"))