From 4963c365e5cb58b59549204d038bc84d2b7b207c Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Fri, 12 May 2006 11:18:04 +0000
Subject: [PATCH] fix to set/send http headers only once per request/response.

---
 lib/WebGUI/Session/Http.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/Session/Http.pm b/lib/WebGUI/Session/Http.pm
index bd60abbd9..a0c71be8e 100644
--- a/lib/WebGUI/Session/Http.pm
+++ b/lib/WebGUI/Session/Http.pm
@@ -176,6 +176,7 @@ sub sendHeader {
 	return undef if ($self->{_http}{noHeader});
 	my $request = $self->session->request;
 	return undef unless $request;
+	$self->{_http}{noHeader} = 1;
 	my %params;
 	if ($self->isRedirect()) {
 		$request->headers_out->set(Location => $self->{_http}{location});