(gnus-registry-user-format-function-M): Reinstate, since removing it breaks people...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b869dd2..fcb70a1 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-06-26  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-registry.el (gnus-registry-user-format-function-M): Reinstate,
+       since removing it breaks people upgrading.
+
        * shr.el (shr-put-image): Use the new interface for animating images.
        (shr-put-image): Animate for 60 seconds.
 

diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el
index a44986e..f8ff52f 100644 (file)
--- a/lisp/gnus-registry.el
+++ b/lisp/gnus-registry.el
@@ -914,6 +914,9 @@ Uses `gnus-registry-marks' to find what shortcuts to install."
 (make-obsolete 'gnus-registry-user-format-function-M
                'gnus-registry-article-marks-to-chars "24.1") ?
 
+(defalias 'gnus-registry-user-format-function-M
+  'gnus-registry-article-marks-to-chars)
+
 ;; use like this:
 ;; (defalias 'gnus-user-format-function-M 'gnus-registry-article-marks-to-chars)
 (defun gnus-registry-article-marks-to-chars (headers)