X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgnus-registry.el;fp=lisp%2Fgnus-registry.el;h=829734f17c3c1e153c72fe15f73e8cae9917680d;hp=e808b1975b4087d82f0cbac437641f24b4c62408;hb=68819187129126e5cfb9aa0cf0249f98cddc375c;hpb=b53d52ca26581bc70fa02da4bc243678e4a44daa

diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el
index e808b1975..829734f17 100644
--- a/lisp/gnus-registry.el
+++ b/lisp/gnus-registry.el
@@ -296,8 +296,13 @@ This is not required after changing `gnus-registry-cache-file'."
     (condition-case nil
         (progn
           (gnus-message 5 "Reading Gnus registry from %s..." file)
-          (setq gnus-registry-db (gnus-registry-fixup-registry
-                                  (eieio-persistent-read file)))
+          (setq gnus-registry-db
+		(gnus-registry-fixup-registry
+		 (condition-case nil
+		     (eieio-persistent-read file 'registry-db)
+		   ;; Older EIEIO versions do not check the class name.
+		   ('wrong-number-of-arguments
+		    (eieio-persistent-read file)))))
           (gnus-message 5 "Reading Gnus registry from %s...done" file))
       (error
        (gnus-message