Index: generic/tclAPI.h =================================================================== diff -u -r142687efa93af981936db61ecfde494d8f269b0a -r2f283277aff2bb9488419a4fbe2442a5b17546e5 --- generic/tclAPI.h (.../tclAPI.h) (revision 142687efa93af981936db61ecfde494d8f269b0a) +++ generic/tclAPI.h (.../tclAPI.h) (revision 2f283277aff2bb9488419a4fbe2442a5b17546e5) @@ -55,12 +55,12 @@ static int convertToMethodproperty(Tcl_Interp *interp, Tcl_Obj *objPtr, XOTclParam CONST *pPtr, ClientData *clientData) { int index, result; - static CONST char *opts[] = {"protected", "public", "static", "slotobj", NULL}; + static CONST char *opts[] = {"protected", "redefine-protected", "slotobj", NULL}; result = Tcl_GetIndexFromObj(interp, objPtr, opts, "methodproperty", 0, &index); *clientData = (ClientData) index + 1; return result; } -enum MethodpropertyIdx {MethodpropertyNULL, MethodpropertyProtectedIdx, MethodpropertyPublicIdx, MethodpropertyStaticIdx, MethodpropertySlotobjIdx}; +enum MethodpropertyIdx {MethodpropertyNULL, MethodpropertyProtectedIdx, MethodpropertyRedefine_protectedIdx, MethodpropertySlotobjIdx}; static int convertToRelationtype(Tcl_Interp *interp, Tcl_Obj *objPtr, XOTclParam CONST *pPtr, ClientData *clientData) { int index, result;