rem: return RegisterCmd(arg, interp, argc, argv, 1);
add: return RegisterCmd(arg, interp, argc, argv, TAG_OPROC);
context: NsTclRegisterTagCmd(ClientData arg, Tcl_Interp *interp, int argc,		    char **argv){    return RegisterCmd(arg, interp, argc, argv, 1);}