in tcl_cmds.c [1227:1237]
static int r_set_connection_notes(int objc, Tcl_Obj *CONST objv[])
{
if (objc != 4) {
Tcl_WrongNumArgs(interp, 2, objv, "note_name note");
return TCL_ERROR;
}
apr_table_set(_r->connection->notes, Tcl_GetString(objv[2]), Tcl_GetString(objv[3]));
return TCL_OK;
}