Index: generic/predefined.xotcl =================================================================== diff -u -r142687efa93af981936db61ecfde494d8f269b0a -r2f283277aff2bb9488419a4fbe2442a5b17546e5 --- generic/predefined.xotcl (.../predefined.xotcl) (revision 142687efa93af981936db61ecfde494d8f269b0a) +++ generic/predefined.xotcl (.../predefined.xotcl) (revision 2f283277aff2bb9488419a4fbe2442a5b17546e5) @@ -43,10 +43,10 @@ # TODO: info methods shows finally "slots" and "slot". Wanted? # protect some methods against redefinition - ::xotcl::methodproperty Object destroy static true - ::xotcl::methodproperty Class alloc static true - ::xotcl::methodproperty Class dealloc static true - ::xotcl::methodproperty Class create static true + ::xotcl::methodproperty Object destroy redefine-protected true + ::xotcl::methodproperty Class alloc redefine-protected true + ::xotcl::methodproperty Class dealloc redefine-protected true + ::xotcl::methodproperty Class create redefine-protected true # define method "method" for Class and Object ::xotcl::dispatch Class ::xotcl::cmd::Class::class-method method {