From: morioka <morioka>
Date: Sat, 15 May 1999 10:06:42 +0000 (+0000)
Subject: (luna-make-entity-function): Send `initialize-instance'.
X-Git-Tag: chao-1_13_0~54
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c18605df7958ca72dc942bd76cd711b41e5c1b42;p=elisp%2Fflim.git

(luna-make-entity-function): Send `initialize-instance'.
---

diff --git a/luna.el b/luna.el
index abc3c69..bc23bc5 100644
--- a/luna.el
+++ b/luna.el
@@ -107,6 +107,7 @@ It must be plist and each slot name must have prefix `:'."
       (if s
 	  (aset v (get s 'luna-member-index) i)
 	))
+    (luna-send v 'initialize-instance v)
     v))
 
 (defsubst luna-class-find-member (class member-name)