# HG changeset patch
# User Aidan Kehoe <kehoea@parhasard.net>
# Date 1325511331 0
# Node ID 2fc3f2f355236d8730d4989461ba336ebd443be9
# Parent  2014ff433dafca722d256995c405d3a8faabfd85
Put back compatibility alias for #'cl-puthash, used by 21.4's setf expansion

2012-01-02  Aidan Kehoe  <kehoea@parhasard.net>

	* obsolete.el (cl-puthash): Put back a compatibility alias for
	this, setf-expansion of #'gethash calls it on 21.4, so it will
	occur in packages for a while to come.

diff -r 2014ff433daf -r 2fc3f2f35523 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Jan 01 15:18:52 2012 +0000
+++ b/lisp/ChangeLog	Mon Jan 02 13:35:31 2012 +0000
@@ -1,3 +1,9 @@
+2012-01-02  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* obsolete.el (cl-puthash): Put back a compatibility alias for
+	this, setf-expansion of #'gethash calls it on 21.4, so it will
+	occur in packages for a while to come.
+
 2011-12-30  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* subr.el (copy-symbol): Don't error with a non-list plist, as
diff -r 2014ff433daf -r 2fc3f2f35523 lisp/obsolete.el
--- a/lisp/obsolete.el	Sun Jan 01 15:18:52 2012 +0000
+++ b/lisp/obsolete.el	Mon Jan 02 13:35:31 2012 +0000
@@ -257,6 +257,10 @@
 
 (make-obsolete 'cl-delete-duplicates 'delete-duplicates)
 
+;; This occurs because of setf expansion by 21.4, changing the affected
+;; packages won't fix that.
+(define-obsolete-function-alias 'cl-puthash 'puthash)
+
 ; old names
 (define-compatible-function-alias 'byte-code-function-p
   'compiled-function-p) ;FSFmacs