From: yamaoka <yamaoka>
Date: Fri, 15 Dec 2000 09:14:39 +0000 (+0000)
Subject: * luna.el (luna-define-method): Don't clear method cache because old Emacs
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=92779f74a6bad9b055d0f11a68095953f0f4a421;p=elisp%2Fflim.git

* luna.el (luna-define-method): Don't clear method cache because old Emacs
 does not have `unintern'.
---

diff --git a/luna.el b/luna.el
index 3481bad..bf2c76d 100644
--- a/luna.el
+++ b/luna.el
@@ -189,10 +189,7 @@ The optional 5th BODY is the body of the method."
 				 (cdr args)))
 		      (,@ definition))))
 	     (sym (luna-class-find-or-make-member
-		   (luna-find-class '(, class)) '(, name)))
-	     (cache (get '(, name) 'luna-method-cache)))
-	 (if cache
-	     (unintern '(, class) cache))
+		   (luna-find-class '(, class)) '(, name))))
 	 (fset sym func)
 	 (put sym 'luna-method-qualifier (, method-qualifier))))))