Return-Path: Delivered-To: apmail-tcl-mod_dtcl-cvs-archive@tcl.apache.org Received: (qmail 55124 invoked by uid 500); 2 Nov 2002 19:00:19 -0000 Mailing-List: contact mod_dtcl-cvs-help@tcl.apache.org; run by ezmlm Precedence: bulk List-Post: List-Help: List-Unsubscribe: List-Subscribe: Delivered-To: mailing list mod_dtcl-cvs@tcl.apache.org Received: (qmail 55082 invoked by uid 500); 2 Nov 2002 19:00:18 -0000 Delivered-To: apmail-tcl-moddtcl-cvs@apache.org Date: 2 Nov 2002 19:00:05 -0000 Message-ID: <20021102190005.80759.qmail@icarus.apache.org> From: davidw@apache.org To: tcl-moddtcl-cvs@apache.org Subject: cvs commit: tcl-moddtcl mod_dtcl.c X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N davidw 2002/11/02 11:00:04 Modified: . mod_dtcl.c Log: * Cleanup after HEAD requests. Revision Changes Path 1.55 +3 -3 tcl-moddtcl/mod_dtcl.c Index: mod_dtcl.c =================================================================== RCS file: /home/cvs/tcl-moddtcl/mod_dtcl.c,v retrieving revision 1.54 retrieving revision 1.55 diff -u -r1.54 -r1.55 --- mod_dtcl.c 18 Apr 2002 13:02:19 -0000 1.54 +++ mod_dtcl.c 2 Nov 2002 19:00:04 -0000 1.55 @@ -467,8 +467,7 @@ { set_header_type(r, DEFAULT_HEADER_TYPE); print_headers(r); - - return OK; + goto cleanup; } ap_cpystrn(error, DEFAULT_ERROR_MSG, sizeof(error)); @@ -589,6 +588,7 @@ get_parse_exec_file(r, dsc, r->filename, 1); /* reset globals */ +cleanup: *(dsc->buffer_output) = 0; *(dsc->headers_printed) = 0; *(dsc->headers_set) = 0; --------------------------------------------------------------------- To unsubscribe, e-mail: mod_dtcl-cvs-unsubscribe@tcl.apache.org For additional commands, e-mail: mod_dtcl-cvs-help@tcl.apache.org