rem: if (!tagPtr->isproc) { Tcl_DStringAppend(&script, "ns_adp_eval", -1);
add: if (tagPtr->type == TAG_ADP) { Tcl_DStringAppend(&script, "ns_adp_eval ", -1);
context: AppendTag(AdpParse *parsePtr, Tag *tagPtr, char *as, char *ae, char *se){    Tcl_DString script;    char save;    Tcl_DStringInit(&script);    Tcl_DStringAppend(&script, "ns_adp_append [", -1);    if (!tagPtr->isproc) {	Tcl_DStringAppend(&script, "ns_adp_eval", -1);    }    Tcl_DStringAppendElement(&script, tagPtr->string);    if (se > ae) {	save = *se;	*se = '\0';	Tcl_DStringAppendElement(&script, ae + 1);	*se = save;    }    Tcl_DStringAppend(&script, " [ns_set create", -1);    Tcl_DStringAppendElement(&script, tagPtr->tag);    ParseAtts(as, ae, NULL, &script);    Tcl_DStringAppend(&script, "]]", 2);    AppendBlock(parsePtr, script.string, script.string+script.length, 's');    Tcl_DStringFree(&script);}