Index: generic/predefined.h =================================================================== diff -u -r5524b83ed5dda30e55f7a02e4c22d26783688954 -red15b5be7e88cbbcdf6121f3869722dbc354d76f --- generic/predefined.h (.../predefined.h) (revision 5524b83ed5dda30e55f7a02e4c22d26783688954) +++ generic/predefined.h (.../predefined.h) (revision ed15b5be7e88cbbcdf6121f3869722dbc354d76f) @@ -159,8 +159,12 @@ "lappend objopts required\n" "lappend methodopts required}\n" "if {[$slot exists type]} {\n" -"lappend objopts [$slot type]\n" -"lappend methodopts [$slot type]}\n" +"set type [$slot type]\n" +"if {[string match ::* $type]} {\n" +"lappend objopts type=$type\n" +"lappend methodopts type=$type} else {\n" +"lappend objopts $type\n" +"lappend methodopts $type}}\n" "if {[$slot exists multivalued] && [$slot multivalued]} {\n" "if {!([$slot exists type] && [$slot type] eq \"relation\")} {\n" "lappend objopts multivalued} else {}}\n"