X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fregistry.el;h=ab1e37be638f4ed68b1fb04985681d4cba5b867e;hp=f0b315420487dc75ec06f896764285ccac2ba213;hb=0a4cd14e60d05f51a0fb3dd65aa722884a9f5eaa;hpb=1d113068206db537f062ef9a1c3f38de98797200

diff --git a/lisp/registry.el b/lisp/registry.el
index f0b315420..ab1e37be6 100644
--- a/lisp/registry.el
+++ b/lisp/registry.el
@@ -95,6 +95,12 @@
       (error
        "eieio not found in `load-path' or gnus-fallback-lib/ directory.")))
 
+(eval-when-compile
+  (unless (fboundp 'cl-remf)
+    (defalias 'cl-remf 'remf)
+    (defalias 'cl-loop 'loop)
+    (defalias 'cl-subseq 'subseq)))
+
 ;; The version number needs to be kept outside of the class definition
 ;; itself.  The persistent-save process does *not* write to file any
 ;; slot values that are equal to the default :initform value.  If a