X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fcl-macs.el;h=9a9d3a050a928f742496d987298face61a473a58;hb=8b6a943578dd26817b7514ccb0c19119c314ec60;hp=b66b4eae819b0140c82de39b9b4749be4ae316c2;hpb=f52a96980ed9280f8f906a20d4b899dc0b027644;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/cl-macs.el b/lisp/cl-macs.el
index b66b4ea..9a9d3a0 100644
--- a/lisp/cl-macs.el
+++ b/lisp/cl-macs.el
@@ -81,7 +81,7 @@
 	 #'(lambda (n p f)
 	     (list 'put (list 'quote n) (list 'quote p)
 		   (list 'function (cons 'lambda f))))))
-   (car (or features (setq features (list 'cl-kludge))))))
+   'xemacs))
 
 
 ;;; Initialization.